home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-12-05 | 12.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 20 | 3c 53 57 61 76 65 24 44 |..... > |<SWave$D|
|00000010| 69 72 3e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ir>.!Run|Image...|
|00000020| 34 ee 20 85 20 20 eb 31 | 32 3a c8 99 22 48 6f 75 |4. . .1|2:.."Hou|
|00000030| 72 67 6c 61 73 73 5f 53 | 6d 61 73 68 22 3a f6 3a |rglass_S|mash":.:|
|00000040| f1 22 20 61 74 20 6c 69 | 6e 65 3a 20 22 3b 9e 3a |." at li|ne: ";.:|
|00000050| e0 0d 00 1e 1f 76 65 72 | 73 69 6f 6e 24 3d 22 31 |.....ver|sion$="1|
|00000060| 2e 35 32 20 28 32 39 2d | 4d 61 79 2d 39 32 29 22 |.52 (29-|May-92)"|
|00000070| 0d 00 28 0d de 20 71 25 | 20 31 35 30 30 0d 00 32 |..(.. q%| 1500..2|
|00000080| 0e 24 71 25 3d 22 54 41 | 53 4b 22 0d 00 3c 31 c8 |.$q%="TA|SK"..<1.|
|00000090| 99 20 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |. "Wimp_|Initiali|
|000000a0| 73 65 22 2c 32 30 30 2c | 21 71 25 2c 22 53 57 61 |se",200,|!q%,"SWa|
|000000b0| 76 65 22 20 b8 20 2c 74 | 61 73 6b 25 0d 00 46 15 |ve" . ,t|ask%..F.|
|000000c0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |.. "Hour|glass_On|
|000000d0| 22 0d 00 50 30 41 70 70 | 44 69 72 24 3d a4 6f 73 |"..P0App|Dir$=.os|
|000000e0| 5f 56 61 72 47 65 74 56 | 61 6c 28 71 25 2c 32 30 |_VarGetV|al(q%,20|
|000000f0| 30 30 2c 22 53 57 61 76 | 65 24 44 69 72 22 2c 31 |00,"SWav|e$Dir",1|
|00000100| 29 0d 00 5a 2f 53 25 3d | 8e 20 22 3c 53 57 61 76 |)..Z/S%=|. "<SWav|
|00000110| 65 24 44 69 72 3e 2e 53 | 70 72 69 74 65 73 22 3a |e$Dir>.S|prites":|
|00000120| 54 25 3d a2 23 53 25 2b | 31 36 3a d9 23 20 53 25 |T%=.#S%+|16:.# S%|
|00000130| 0d 00 64 38 de 20 73 70 | 20 54 25 3a 21 73 70 3d |..d8. sp| T%:!sp=|
|00000140| 54 25 3a 73 70 21 34 3d | 30 3a 73 70 21 38 3d 31 |T%:sp!4=|0:sp!8=1|
|00000150| 36 3a 73 70 21 31 32 3d | 31 36 3a de 20 41 28 35 |6:sp!12=|16:. A(5|
|00000160| 30 29 2c 42 28 35 30 29 | 0d 00 6e 2a de 20 73 70 |0),B(50)|..n*. sp|
|00000170| 31 20 35 30 30 30 30 3a | 73 70 31 21 34 3d 30 3a |1 50000:|sp1!4=0:|
|00000180| 73 70 31 21 38 3d 31 36 | 3a 73 70 31 21 31 32 3d |sp1!8=16|:sp1!12=|
|00000190| 31 36 0d 00 78 38 c8 99 | 20 22 4f 53 5f 53 70 72 |16..x8..| "OS_Spr|
|000001a0| 69 74 65 4f 70 22 2c 26 | 32 30 39 2c 73 70 20 20 |iteOp",&|209,sp |
|000001b0| 3a c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |:.. "OS_|SpriteOp|
|000001c0| 22 2c 26 32 30 39 2c 73 | 70 31 0d 00 82 42 c8 99 |",&209,s|p1...B..|
|000001d0| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 26 | "OS_Spr|iteOp",&|
|000001e0| 32 30 41 2c 73 70 2c 22 | 3c 53 57 61 76 65 24 44 |20A,sp,"|<SWave$D|
|000001f0| 69 72 3e 2e 53 70 72 69 | 74 65 73 22 20 3a f4 20 |ir>.Spri|tes" :. |
|00000200| 6c 6f 61 64 20 73 70 72 | 69 74 65 73 0d 00 8c 33 |load spr|ites...3|
|00000210| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00000220| 2c 26 32 30 46 2c 73 70 | 31 2c 22 73 63 72 65 65 |,&20F,sp|1,"scree|
|00000230| 6e 22 2c 30 2c 36 30 30 | 2c 31 36 30 2c 31 32 0d |n",0,600|,160,12.|
|00000240| 00 96 3b de 20 73 6e 61 | 6d 65 31 25 20 32 30 2c |..;. sna|me1% 20,|
|00000250| 73 6e 61 6d 65 32 25 20 | 32 30 3a 24 73 6e 61 6d |sname2% |20:$snam|
|00000260| 65 31 25 3d 22 73 63 72 | 65 65 6e 22 3a 24 73 6e |e1%="scr|een":$sn|
|00000270| 61 6d 65 32 25 3d 22 31 | 22 3a 0d 00 a0 44 c8 99 |ame2%="1|":...D..|
|00000280| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 26 | "OS_Spr|iteOp",&|
|00000290| 31 31 38 2c 73 70 31 2c | 73 6e 61 6d 65 31 25 20 |118,sp1,|sname1% |
|000002a0| b8 20 2c 2c 73 70 5f 70 | 74 72 31 25 3a f4 20 70 |. ,,sp_p|tr1%:. p|
|000002b0| 74 72 20 74 6f 20 27 73 | 63 72 65 65 6e 27 0d 00 |tr to 's|creen'..|
|000002c0| aa 43 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |.C.. "OS|_SpriteO|
|000002d0| 70 22 2c 26 31 31 38 2c | 73 70 2c 73 6e 61 6d 65 |p",&118,|sp,sname|
|000002e0| 32 25 20 b8 20 2c 2c 73 | 70 5f 70 74 72 32 25 3a |2% . ,,s|p_ptr2%:|
|000002f0| f4 20 70 74 72 20 74 6f | 20 27 73 63 72 65 65 6e |. ptr to| 'screen|
|00000300| 27 0d 00 b4 37 73 69 63 | 6f 6e 3d a4 69 63 6f 6e |'...7sic|on=.icon|
|00000310| 5f 63 72 65 61 74 65 28 | 2d 31 2c 30 2c 30 2c 36 |_create(|-1,0,0,6|
|00000320| 38 2c 36 38 2c 30 2c 30 | 2c 26 33 30 30 32 2c 22 |8,68,0,0|,&3002,"|
|00000330| 21 53 57 61 76 65 22 29 | 0d 00 be 12 63 6c 61 69 |!SWave")|....clai|
|00000340| 6d 71 75 65 72 79 24 3d | 22 22 0d 00 c8 3b 63 6c |mquery$=|""...;cl|
|00000350| 61 69 6d 6d 65 6e 75 24 | 20 3d 22 22 20 20 20 20 |aimmenu$| ="" |
|00000360| 20 20 20 20 20 3a f4 20 | 53 65 74 20 62 79 20 74 | :. |Set by t|
|00000370| 68 65 20 6d 65 6e 75 5f | 78 78 78 78 20 72 6f 75 |he menu_|xxxx rou|
|00000380| 74 69 6e 65 73 0d 00 d2 | 3f 63 6c 61 69 6d 64 72 |tines...|?claimdr|
|00000390| 61 67 24 20 3d 22 22 20 | 20 20 20 20 20 20 20 20 |ag$ ="" | |
|000003a0| 3a f4 20 53 65 74 20 62 | 79 20 74 68 65 20 75 73 |:. Set b|y the us|
|000003b0| 65 72 64 72 61 67 5f 78 | 78 78 78 20 72 6f 75 74 |erdrag_x|xxx rout|
|000003c0| 69 6e 65 73 0d 00 dc 16 | 63 6c 6f 73 65 64 6f 77 |ines....|closedow|
|000003d0| 6e 20 20 20 20 20 20 20 | 3d a3 0d 00 e6 16 6f 70 |n |=.....op|
|000003e0| 65 6e 25 20 20 20 20 20 | 20 20 20 20 20 20 3d a3 |en% | =.|
|000003f0| 0d 00 f0 16 63 68 61 6e | 67 65 64 25 20 20 20 20 |....chan|ged% |
|00000400| 20 20 20 20 3d b9 0d 00 | fa 16 77 68 6f 6c 65 25 | =...|..whole%|
|00000410| 20 20 20 20 20 20 20 20 | 20 20 3d b9 0d 01 04 11 | | =.....|
|00000420| 64 72 61 77 6e 25 3d a3 | 3a 66 25 3d 32 0d 01 0e |drawn%=.|:f%=2...|
|00000430| 1d 71 3d 30 3a 47 3d 32 | 2f 33 3a 44 25 3d 30 3a |.q=0:G=2|/3:D%=0:|
|00000440| f2 53 57 61 76 65 6d 61 | 6b 65 0d 01 18 42 de 20 |.SWavema|ke...B. |
|00000450| 74 65 78 74 24 28 35 30 | 29 2c 73 65 74 74 69 6e |text$(50|),settin|
|00000460| 67 28 35 30 29 2c 66 6c | 61 67 73 28 35 30 29 20 |g(50),fl|ags(50) |
|00000470| 3a f4 20 75 73 65 64 20 | 62 79 20 74 68 65 20 6d |:. used |by the m|
|00000480| 65 6e 75 20 72 6f 75 74 | 69 6e 65 73 0d 01 22 42 |enu rout|ines.."B|
|00000490| de 20 73 75 62 6d 65 6e | 75 28 35 30 29 2c 72 65 |. submen|u(50),re|
|000004a0| 66 28 35 30 29 2c 6d 65 | 6e 75 70 6f 73 28 32 30 |f(50),me|nupos(20|
|000004b0| 29 20 3a f4 20 75 73 65 | 64 20 62 79 20 74 68 65 |) :. use|d by the|
|000004c0| 20 6d 65 6e 75 20 72 6f | 75 74 69 6e 65 73 0d 01 | menu ro|utines..|
|000004d0| 2c 0f de 20 6d 65 6e 75 | 25 20 35 31 32 0d 01 36 |,.. menu|% 512..6|
|000004e0| 15 de 20 69 6e 64 69 72 | 65 63 74 25 20 26 32 30 |.. indir|ect% &20|
|000004f0| 30 30 0d 01 40 12 de 20 | 6d 73 67 62 6c 6b 25 20 |00..@.. |msgblk% |
|00000500| 32 35 36 3a 0d 01 4a 29 | 3a f4 20 55 73 65 64 20 |256:..J)|:. Used |
|00000510| 66 6f 72 20 69 6e 74 65 | 72 20 74 61 73 6b 20 63 |for inte|r task c|
|00000520| 6f 6d 6d 75 6e 69 63 61 | 74 69 6f 6e 73 0d 01 54 |ommunica|tions..T|
|00000530| 25 69 70 74 72 25 3d 69 | 6e 64 69 72 65 63 74 25 |%iptr%=i|ndirect%|
|00000540| 3a 69 65 6e 64 25 3d 69 | 70 74 72 25 2b 26 32 30 |:iend%=i|ptr%+&20|
|00000550| 30 30 0d 01 5e 1a de 20 | 66 64 61 74 65 25 20 35 |00..^.. |fdate% 5|
|00000560| 2c 66 62 75 66 66 65 72 | 25 20 32 38 0d 01 68 2e |,fbuffer|% 28..h.|
|00000570| f2 6f 70 65 6e 74 65 6d | 70 6c 61 74 65 66 69 6c |.opentem|platefil|
|00000580| 65 28 22 3c 53 57 61 76 | 65 24 44 69 72 3e 2e 54 |e("<SWav|e$Dir>.T|
|00000590| 65 6d 70 6c 61 74 65 73 | 22 29 0d 01 72 1d f2 6c |emplates|")..r..l|
|000005a0| 6f 61 64 74 65 6d 70 6c | 61 74 65 28 22 70 72 6f |oadtempl|ate("pro|
|000005b0| 67 49 6e 66 6f 22 29 0d | 01 7c 26 c8 99 20 22 57 |gInfo").|.|&.. "W|
|000005c0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|000005d0| 22 2c 2c 71 25 20 b8 20 | 69 6e 66 6f 25 0d 01 86 |",,q% . |info%...|
|000005e0| 1a f2 6c 6f 61 64 74 65 | 6d 70 6c 61 74 65 28 22 |..loadte|mplate("|
|000005f0| 6d 61 69 6e 77 22 29 0d | 01 90 16 71 25 21 36 34 |mainw").|...q%!64|
|00000600| 3d 73 70 3a 71 25 21 36 | 34 3d 73 70 31 0d 01 9a |=sp:q%!6|4=sp1...|
|00000610| 27 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |'.. "Wim|p_Create|
|00000620| 57 69 6e 64 6f 77 22 2c | 2c 71 25 20 b8 20 6d 61 |Window",|,q% . ma|
|00000630| 69 6e 77 25 0d 01 a4 16 | f2 63 6c 6f 73 65 74 65 |inw%....|.closete|
|00000640| 6d 70 6c 61 74 65 66 69 | 6c 65 0d 01 ae 28 f2 69 |mplatefi|le...(.i|
|00000650| 63 6f 6e 5f 70 75 74 64 | 61 74 61 28 71 25 2c 69 |con_putd|ata(q%,i|
|00000660| 6e 66 6f 25 2c 34 2c 76 | 65 72 73 69 6f 6e 24 2c |nfo%,4,v|ersion$,|
|00000670| 30 29 0d 01 b8 16 65 72 | 72 6f 72 5f 66 6c 61 67 |0)....er|ror_flag|
|00000680| 25 20 20 20 20 20 3d 33 | 0d 01 c2 0c f2 6e 65 77 |% =3|.....new|
|00000690| 76 61 6c 73 0d 01 cc 0e | ee 20 85 20 f2 65 72 72 |vals....|. . .err|
|000006a0| 6f 72 0d 01 d6 16 c8 99 | 20 22 48 6f 75 72 67 6c |or......| "Hourgl|
|000006b0| 61 73 73 5f 4f 66 66 22 | 0d 01 e0 05 f5 0d 01 ea |ass_Off"|........|
|000006c0| 17 20 20 f2 61 63 74 69 | 6f 6e 28 a4 70 6f 6c 6c |. .acti|on(.poll|
|000006d0| 28 30 29 29 0d 01 f4 0f | fd 20 63 6c 6f 73 65 64 |(0))....|. closed|
|000006e0| 6f 77 6e 0d 01 fe 0e 24 | 71 25 3d 22 54 41 53 4b |own....$|q%="TASK|
|000006f0| 22 0d 02 08 22 c8 99 20 | 22 57 69 6d 70 5f 43 6c |"...".. |"Wimp_Cl|
|00000700| 6f 73 65 44 6f 77 6e 22 | 2c 74 61 73 6b 25 2c 71 |oseDown"|,task%,q|
|00000710| 25 21 30 0d 02 12 05 e0 | 0d 02 1c 0b dd f2 65 72 |%!0.....|......er|
|00000720| 72 6f 72 0d 02 26 15 e7 | 20 65 72 72 6f 72 5f 66 |ror..&..| error_f|
|00000730| 6c 61 67 25 3d 33 20 8c | 0d 02 30 4b 20 20 f2 65 |lag%=3 .|..0K .e|
|00000740| 72 72 6f 72 62 6f 78 28 | 22 55 6e 65 78 70 65 63 |rrorbox(|"Unexpec|
|00000750| 74 65 64 20 65 72 72 6f | 72 3a 2d 20 22 2b f6 24 |ted erro|r:- "+.$|
|00000760| 2b 22 20 49 6e 74 65 72 | 6e 61 6c 20 65 72 72 6f |+" Inter|nal erro|
|00000770| 72 20 63 6f 64 65 20 22 | 2b c3 9e 29 3a f1 46 49 |r code "|+..):.FI|
|00000780| 4c 45 24 0d 02 3a 05 cc | 0d 02 44 13 20 20 f2 65 |LE$..:..|..D. .e|
|00000790| 72 72 6f 72 62 6f 78 28 | f6 24 29 0d 02 4e 04 0d |rrorbox(|.$)..N..|
|000007a0| 02 58 05 cd 0d 02 62 11 | 65 72 72 6f 72 5f 66 6c |.X....b.|error_fl|
|000007b0| 61 67 25 3d 33 0d 02 6c | 18 c8 99 20 22 48 6f 75 |ag%=3..l|... "Hou|
|000007c0| 72 67 6c 61 73 73 5f 53 | 6d 61 73 68 22 0d 02 76 |rglass_S|mash"..v|
|000007d0| 05 e1 0d 02 80 04 0d 02 | 8a 0c dd f2 6f 6b 28 65 |........|....ok(e|
|000007e0| 24 29 0d 02 94 11 65 72 | 72 6f 72 5f 66 6c 61 67 |$)....er|ror_flag|
|000007f0| 25 3d 31 0d 02 9e 0a 85 | 20 31 2c 65 24 0d 02 a8 |%=1.....| 1,e$...|
|00000800| 05 e1 0d 02 b2 04 0d 02 | bc 12 dd f2 65 72 72 6f |........|....erro|
|00000810| 72 62 6f 78 28 72 24 29 | 0d 02 c6 08 ea 20 72 25 |rbox(r$)|..... r%|
|00000820| 0d 02 d0 19 21 71 25 3d | 9f 3a 24 28 71 25 2b 34 |....!q%=|.:$(q%+4|
|00000830| 29 3d 72 24 2b bd 28 30 | 29 0d 02 da 35 c8 99 20 |)=r$+.(0|)...5.. |
|00000840| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00000850| 72 22 2c 71 25 2c 65 72 | 72 6f 72 5f 66 6c 61 67 |r",q%,er|ror_flag|
|00000860| 25 2c 22 53 57 61 76 65 | 22 20 b8 20 72 25 0d 02 |%,"SWave|" . r%..|
|00000870| e4 18 e7 20 72 25 3d 32 | 20 8c 20 63 6c 6f 73 65 |... r%=2| . close|
|00000880| 64 6f 77 6e 3d b9 0d 02 | ee 05 e1 0d 02 f8 3c dd |down=...|......<.|
|00000890| f2 63 6c 69 63 6b 77 69 | 6e 64 6f 77 28 6d 6f 75 |.clickwi|ndow(mou|
|000008a0| 73 65 78 25 2c 6d 6f 75 | 73 65 79 25 2c 62 75 74 |sex%,mou|sey%,but|
|000008b0| 74 6f 6e 25 2c 68 61 6e | 64 6c 65 25 2c 69 63 6f |ton%,han|dle%,ico|
|000008c0| 6e 25 2c 6f 62 25 29 0d | 03 02 10 c8 8e 20 68 61 |n%,ob%).|..... ha|
|000008d0| 6e 64 6c 65 25 20 ca 0d | 03 0c 2c 20 20 c9 20 6d |ndle% ..|.., . m|
|000008e0| 61 69 6e 77 25 20 20 20 | 3a f2 63 6c 69 63 6b 6d |ainw% |:.clickm|
|000008f0| 61 69 6e 77 28 62 75 74 | 74 6f 6e 25 2c 69 63 6f |ainw(but|ton%,ico|
|00000900| 6e 25 29 0d 03 16 2e 20 | 20 c9 20 2d 32 20 20 20 |n%).... | . -2 |
|00000910| 20 20 20 20 3a f2 63 6c | 69 63 6b 69 63 6f 6e 62 | :.cl|ickiconb|
|00000920| 61 72 28 62 75 74 74 6f | 6e 25 2c 69 63 6f 6e 25 |ar(butto|n%,icon%|
|00000930| 29 0d 03 20 05 cb 0d 03 | 2a 04 0d 03 34 05 e1 0d |).. ....|*...4...|
|00000940| 03 3e 21 dd f2 63 6c 69 | 63 6b 69 63 6f 6e 62 61 |.>!..cli|ckiconba|
|00000950| 72 28 62 75 74 74 6f 6e | 25 2c 69 63 6f 6e 25 29 |r(button|%,icon%)|
|00000960| 0d 03 48 11 e7 20 69 63 | 6f 6e 25 3c 30 20 8c 20 |..H.. ic|on%<0 . |
|00000970| e1 0d 03 52 0a c8 8e 20 | b9 20 ca 0d 03 5c 11 20 |...R... |. ...\. |
|00000980| 20 c9 20 62 75 74 74 6f | 6e 25 3d 32 0d 03 66 20 | . butto|n%=2..f |
|00000990| 20 20 20 20 f4 20 6f 70 | 65 6e 73 20 74 68 65 20 | . op|ens the |
|000009a0| 69 63 6f 6e 62 61 72 20 | 6d 65 6e 75 0d 03 70 17 |iconbar |menu..p.|
|000009b0| 20 20 20 20 e7 20 69 63 | 6f 6e 25 3d 73 69 63 6f | . ic|on%=sico|
|000009c0| 6e 20 8c 0d 03 7a 15 20 | 20 20 20 20 20 f2 6d 65 |n ...z. | .me|
|000009d0| 6e 75 5f 73 69 63 6f 6e | 0d 03 84 09 20 20 20 20 |nu_sicon|.... |
|000009e0| cd 0d 03 8e 11 20 20 c9 | 20 62 75 74 74 6f 6e 25 |..... .| button%|
|000009f0| 3d 34 0d 03 98 32 20 20 | 20 6f 70 65 6e 25 3d b9 |=4...2 | open%=.|
|00000a00| 3a 63 68 61 6e 67 65 64 | 25 3d b9 3a f2 6f 70 65 |:changed|%=.:.ope|
|00000a10| 6e 77 69 6e 64 6f 77 28 | 6d 61 69 6e 77 25 2c a3 |nwindow(|mainw%,.|
|00000a20| 2c 2d 31 29 0d 03 a2 05 | cb 0d 03 ac 05 e1 0d 03 |,-1)....|........|
|00000a30| b6 1f dd f2 63 6c 69 63 | 6b 6d 61 69 6e 77 28 62 |....clic|kmainw(b|
|00000a40| 75 74 74 6f 6e 25 2c 69 | 63 6f 6e 25 29 0d 03 c0 |utton%,i|con%)...|
|00000a50| 0a c8 8e 20 b9 20 ca 0d | 03 ca 15 c9 20 28 62 75 |... . ..|.... (bu|
|00000a60| 74 74 6f 6e 25 20 80 20 | 34 29 3d 34 0d 03 d4 0a |tton% . |4)=4....|
|00000a70| c8 8e 20 b9 20 ca 0d 03 | de 1f c9 20 69 63 6f 6e |.. . ...|... icon|
|00000a80| 25 3d 31 20 3a 66 25 2d | 3d 31 3a e7 66 25 3d 30 |%=1 :f%-|=1:.f%=0|
|00000a90| 20 66 25 3d 31 0d 03 e8 | 18 47 3d 32 2f 66 25 3a | f%=1...|.G=2/f%:|
|00000aa0| ef 37 3a f2 53 57 61 76 | 65 6d 61 6b 65 0d 03 f2 |.7:.SWav|emake...|
|00000ab0| 29 c9 20 69 63 6f 6e 25 | 3d 32 20 3a 66 25 2b 3d |). icon%|=2 :f%+=|
|00000ac0| 31 3a 47 3d 32 2f 66 25 | 3a ef 37 3a f2 53 57 61 |1:G=2/f%|:.7:.SWa|
|00000ad0| 76 65 6d 61 6b 65 0d 03 | fc 05 cb 0d 04 06 05 cb |vemake..|........|
|00000ae0| 0d 04 10 0a c8 8e 20 b9 | 20 ca 0d 04 1a 10 20 c9 |...... .| ..... .|
|00000af0| 20 62 75 74 74 6f 6e 25 | 3d 32 0d 04 24 10 20 f2 | button%|=2..$. .|
|00000b00| 6d 65 6e 75 5f 6d 61 69 | 6e 77 0d 04 2e 06 20 cb |menu_mai|nw.... .|
|00000b10| 0d 04 38 06 20 e1 0d 04 | 42 18 dd f2 64 6f 5f 62 |..8. ...|B...do_b|
|00000b20| 61 63 6b 67 72 6f 75 6e | 64 5f 74 61 73 6b 0d 04 |ackgroun|d_task..|
|00000b30| 4c 19 f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |L..redra|wwindow(|
|00000b40| 6d 61 69 6e 77 25 29 0d | 04 56 05 e1 0d 04 60 1b |mainw%).|.V....`.|
|00000b50| dd f2 72 65 64 72 61 77 | 77 69 6e 64 6f 77 28 68 |..redraw|window(h|
|00000b60| 61 6e 64 6c 65 25 29 0d | 04 6a 0b ea 20 76 6f 69 |andle%).|.j.. voi|
|00000b70| 64 25 0d 04 74 38 71 25 | 21 30 3d 68 61 6e 64 6c |d%..t8q%|!0=handl|
|00000b80| 65 25 3a 71 25 21 34 3d | 31 30 3a 71 25 21 38 3d |e%:q%!4=|10:q%!8=|
|00000b90| 2d 34 35 30 3a 71 25 21 | 31 32 3d 31 31 39 30 3a |-450:q%!|12=1190:|
|00000ba0| 71 25 21 31 36 3d 2d 31 | 30 30 0d 04 7e 27 c8 99 |q%!16=-1|00..~'..|
|00000bb0| 20 22 57 69 6d 70 5f 55 | 70 64 61 74 65 57 69 6e | "Wimp_U|pdateWin|
|00000bc0| 64 6f 77 22 2c 30 2c 71 | 25 20 b8 20 6d 6f 72 65 |dow",0,q|% . more|
|00000bd0| 25 0d 04 88 20 f4 50 52 | 4f 43 6c 77 61 6f 72 69 |%... .PR|OClwaori|
|00000be0| 67 69 6e 28 71 25 2b 34 | 2c 78 30 25 2c 79 30 25 |gin(q%+4|,x0%,y0%|
|00000bf0| 29 0d 04 92 0c c8 95 20 | 6d 6f 72 65 25 0d 04 9c |)...... |more%...|
|00000c00| 0b 20 20 f2 64 72 61 77 | 0d 04 a6 11 f4 20 50 52 |. .draw|..... PR|
|00000c10| 4f 43 6e 65 77 76 61 6c | 73 0d 04 b0 29 20 20 c8 |OCnewval|s...) .|
|00000c20| 99 20 22 57 69 6d 70 5f | 47 65 74 52 65 63 74 61 |. "Wimp_|GetRecta|
|00000c30| 6e 67 6c 65 22 2c 30 2c | 71 25 20 b8 20 6d 6f 72 |ngle",0,|q% . mor|
|00000c40| 65 25 0d 04 ba 05 ce 0d | 04 c4 05 e1 0d 04 ce 19 |e%......|........|
|00000c50| dd a4 6f 6b 74 6f 63 6c | 6f 73 65 77 28 68 61 6e |..oktocl|osew(han|
|00000c60| 64 6c 65 25 29 0d 04 d8 | 0f ea 20 73 68 75 74 74 |dle%)...|.. shutt|
|00000c70| 69 6e 67 25 0d 04 e2 0f | 73 68 75 74 74 69 6e 67 |ing%....|shutting|
|00000c80| 25 3d b9 0d 04 ec 0e 3d | 73 68 75 74 74 69 6e 67 |%=.....=|shutting|
|00000c90| 25 0d 04 f6 0e dd f2 6b | 65 79 70 72 65 73 73 0d |%......k|eypress.|
|00000ca0| 05 00 09 ea 20 69 63 25 | 0d 05 0a 10 e7 20 71 25 |.... ic%|..... q%|
|00000cb0| 21 34 3c 3e 2d 31 20 8c | 0d 05 14 29 20 20 c8 99 |!4<>-1 .|...) ..|
|00000cc0| 20 22 57 69 6d 70 5f 47 | 65 74 43 61 72 65 74 50 | "Wimp_G|etCaretP|
|00000cd0| 6f 73 69 74 69 6f 6e 22 | 2c 2c 6d 73 67 62 6c 6b |osition"|,,msgblk|
|00000ce0| 25 0d 05 1e 13 20 20 69 | 63 25 3d 6d 73 67 62 6c |%.... i|c%=msgbl|
|00000cf0| 6b 25 21 34 0d 05 28 10 | 20 20 c8 8e 20 71 25 21 |k%!4..(.| .. q%!|
|00000d00| 32 34 20 ca 0d 05 32 27 | 20 20 20 20 c9 20 32 37 |24 ...2'| . 27|
|00000d10| 20 8c 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | . .. "W|imp_Crea|
|00000d20| 74 65 4d 65 6e 75 22 2c | 2c 2d 31 0d 05 3c 07 20 |teMenu",|,-1..<. |
|00000d30| 20 7f 0d 05 46 10 20 20 | 20 c8 8e 20 71 25 21 30 | ...F. | .. q%!0|
|00000d40| 20 ca 0d 05 50 2d 20 20 | 20 20 c9 20 6d 61 69 6e | ...P- | . main|
|00000d50| 77 25 20 20 3a f2 6b 65 | 79 70 72 65 73 73 5f 6d |w% :.ke|ypress_m|
|00000d60| 61 69 6e 77 28 69 63 25 | 2c 71 25 21 32 34 29 0d |ainw(ic%|,q%!24).|
|00000d70| 05 5a 09 20 20 20 20 cb | 0d 05 64 07 20 20 cb 0d |.Z. .|..d. ..|
|00000d80| 05 6e 05 cd 0d 05 78 04 | 0d 05 82 05 e1 0d 05 8c |.n....x.|........|
|00000d90| 16 dd a4 6d 65 6e 75 73 | 65 6c 65 63 74 5f 73 69 |...menus|elect_si|
|00000da0| 63 6f 6e 0d 05 96 14 ea | 20 6c 65 76 65 6c 30 2c |con.....| level0,|
|00000db0| 62 75 74 74 6f 6e 25 0d | 05 a0 0f 6c 65 76 65 6c |button%.|...level|
|00000dc0| 30 3d 71 25 21 30 0d 05 | aa 20 c8 99 20 22 57 69 |0=q%!0..|. .. "Wi|
|00000dd0| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00000de0| 6f 22 2c 2c 71 25 0d 05 | b4 10 62 75 74 74 6f 6e |o",,q%..|..button|
|00000df0| 25 3d 71 25 21 38 0d 05 | be 0f c8 8e 20 6c 65 76 |%=q%!8..|.... lev|
|00000e00| 65 6c 30 20 ca 0d 05 c8 | 09 20 20 c9 20 30 0d 05 |el0 ....|. . 0..|
|00000e10| d2 09 20 20 c9 20 31 0d | 05 dc 13 20 20 63 6c 6f |.. . 1.|... clo|
|00000e20| 73 65 64 6f 77 6e 20 3d | 20 b9 0d 05 e6 05 cb 0d |sedown =| .......|
|00000e30| 05 f0 06 3d 30 0d 05 fa | 04 0d 06 04 16 dd a4 6d |...=0...|.......m|
|00000e40| 65 6e 75 73 65 6c 65 63 | 74 5f 6d 61 69 6e 77 0d |enuselec|t_mainw.|
|00000e50| 06 0e 1b ea 20 6c 65 76 | 65 6c 30 2c 6c 65 76 65 |.... lev|el0,leve|
|00000e60| 6c 31 2c 62 75 74 74 6f | 6e 25 0d 06 18 0f 6c 65 |l1,butto|n%....le|
|00000e70| 76 65 6c 30 3d 71 25 21 | 30 0d 06 22 0f 6c 65 76 |vel0=q%!|0..".lev|
|00000e80| 65 6c 31 3d 71 25 21 34 | 0d 06 2c 20 c8 99 20 22 |el1=q%!4|.., .. "|
|00000e90| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00000ea0| 6e 66 6f 22 2c 2c 71 25 | 0d 06 36 10 62 75 74 74 |nfo",,q%|..6.butt|
|00000eb0| 6f 6e 25 3d 71 25 21 38 | 0d 06 40 0f c8 8e 20 6c |on%=q%!8|..@... l|
|00000ec0| 65 76 65 6c 30 20 ca 0d | 06 4a 09 20 20 c9 20 30 |evel0 ..|.J. . 0|
|00000ed0| 0d 06 54 09 20 20 c9 20 | 31 0d 06 5e 10 20 63 6c |..T. . |1..^. cl|
|00000ee0| 6f 73 65 64 6f 77 6e 3d | b9 0d 06 68 05 cb 0d 06 |osedown=|...h....|
|00000ef0| 72 06 3d 30 0d 06 7c 04 | 0d 06 86 10 dd f2 6d 65 |r.=0..|.|......me|
|00000f00| 6e 75 5f 6d 61 69 6e 77 | 0d 06 90 08 ea 20 6e 6f |nu_mainw|..... no|
|00000f10| 0d 06 9a 11 6e 6f 3d 30 | 3a c8 97 20 78 2c 79 2c |....no=0|:.. x,y,|
|00000f20| 62 0d 06 a4 3d f2 64 65 | 66 69 6e 65 5f 6d 65 6e |b...=.de|fine_men|
|00000f30| 75 5f 74 65 78 74 28 22 | 49 6e 66 6f 22 2c 6e 6f |u_text("|Info",no|
|00000f40| 2c 30 2c 30 2c 30 2c 30 | 2c 26 31 30 30 32 31 2c |,0,0,0,0|,&10021,|
|00000f50| 69 6e 66 6f 25 2c 30 29 | 3a 6e 6f 2b 3d 31 0d 06 |info%,0)|:no+=1..|
|00000f60| ae 3a f2 64 65 66 69 6e | 65 5f 6d 65 6e 75 5f 74 |.:.defin|e_menu_t|
|00000f70| 65 78 74 28 22 51 75 69 | 74 22 2c 6e 6f 2c 30 2c |ext("Qui|t",no,0,|
|00000f80| 30 2c 30 2c 30 2c 26 31 | 30 30 32 31 2c 30 2c 2d |0,0,0,&1|0021,0,-|
|00000f90| 31 29 3a 6e 6f 2b 3d 31 | 0d 06 b8 27 f2 63 72 65 |1):no+=1|...'.cre|
|00000fa0| 61 74 65 5f 6d 65 6e 75 | 28 22 53 57 61 76 65 22 |ate_menu|("SWave"|
|00000fb0| 2c 6e 6f 2c 32 31 30 2c | 78 2d 36 34 2c 79 29 0d |,no,210,|x-64,y).|
|00000fc0| 06 c2 0e 6d 65 6e 75 5f | 6e 72 25 3d 30 0d 06 cc |...menu_|nr%=0...|
|00000fd0| 16 63 6c 61 69 6d 6d 65 | 6e 75 24 3d 22 6d 61 69 |.claimme|nu$="mai|
|00000fe0| 6e 77 22 0d 06 d6 05 e1 | 0d 06 e0 10 dd f2 6d 65 |nw".....|......me|
|00000ff0| 6e 75 5f 73 69 63 6f 6e | 0d 06 ea 11 6e 6f 3d 30 |nu_sicon|....no=0|
|00001000| 3a c8 97 20 78 2c 79 2c | 62 0d 06 f4 3d f2 64 65 |:.. x,y,|b...=.de|
|00001010| 66 69 6e 65 5f 6d 65 6e | 75 5f 74 65 78 74 28 22 |fine_men|u_text("|
|00001020| 49 6e 66 6f 22 2c 6e 6f | 2c 30 2c 30 2c 30 2c 30 |Info",no|,0,0,0,0|
|00001030| 2c 26 31 30 30 32 31 2c | 69 6e 66 6f 25 2c 30 29 |,&10021,|info%,0)|
|00001040| 3a 6e 6f 2b 3d 31 0d 06 | fe 3a f2 64 65 66 69 6e |:no+=1..|.:.defin|
|00001050| 65 5f 6d 65 6e 75 5f 74 | 65 78 74 28 22 51 75 69 |e_menu_t|ext("Qui|
|00001060| 74 22 2c 6e 6f 2c 30 2c | 30 2c 30 2c 30 2c 26 31 |t",no,0,|0,0,0,&1|
|00001070| 30 30 32 31 2c 30 2c 2d | 31 29 3a 6e 6f 2b 3d 31 |0021,0,-|1):no+=1|
|00001080| 0d 07 08 30 f2 63 72 65 | 61 74 65 5f 6d 65 6e 75 |...0.cre|ate_menu|
|00001090| 28 22 53 57 61 76 65 22 | 2c 6e 6f 2c 32 31 30 2c |("SWave"|,no,210,|
|000010a0| 78 2d 36 34 2c 39 36 2b | 28 6e 6f 2a 34 30 29 29 |x-64,96+|(no*40))|
|000010b0| 0d 07 12 0e 6d 65 6e 75 | 5f 6e 72 25 3d 30 0d 07 |....menu|_nr%=0..|
|000010c0| 1c 15 63 6c 61 69 6d 6d | 65 6e 75 24 3d 22 78 66 |..claimm|enu$="xf|
|000010d0| 65 72 22 0d 07 26 05 e1 | 0d 07 30 16 dd f2 77 68 |er"..&..|..0...wh|
|000010e0| 69 63 68 6d 65 6e 75 28 | 6d 65 6e 75 24 29 0d 07 |ichmenu(|menu$)..|
|000010f0| 3a 0b ea 20 76 6f 69 64 | 25 0d 07 44 0e c8 8e 20 |:.. void|%..D... |
|00001100| 6d 65 6e 75 24 20 ca 0d | 07 4e 28 20 20 c9 20 22 |menu$ ..|.N( . "|
|00001110| 6d 61 69 6e 77 22 20 3a | 76 6f 69 64 25 3d a4 6d |mainw" :|void%=.m|
|00001120| 65 6e 75 73 65 6c 65 63 | 74 5f 6d 61 69 6e 77 0d |enuselec|t_mainw.|
|00001130| 07 58 28 20 20 c9 20 22 | 78 66 65 72 22 20 20 3a |.X( . "|xfer" :|
|00001140| 76 6f 69 64 25 3d a4 6d | 65 6e 75 73 65 6c 65 63 |void%=.m|enuselec|
|00001150| 74 5f 73 69 63 6f 6e 0d | 07 62 05 cb 0d 07 6c 05 |t_sicon.|.b....l.|
|00001160| e1 0d 07 76 12 dd f2 66 | 69 6c 65 5f 63 68 61 6e |...v...f|ile_chan|
|00001170| 67 65 64 0d 07 80 05 e1 | 0d 07 8a 26 dd f2 6f 70 |ged.....|...&..op|
|00001180| 65 6e 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |enwindow|(handle%|
|00001190| 2c 66 75 6c 6c 25 2c 66 | 72 6f 6e 74 25 29 0d 07 |,full%,f|ront%)..|
|000011a0| 94 10 71 25 21 30 3d 68 | 61 6e 64 6c 65 25 0d 07 |..q%!0=h|andle%..|
|000011b0| 9e 2d e7 20 ac 20 66 75 | 6c 6c 25 20 8c 20 c8 99 |.-. . fu|ll% . ..|
|000011c0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|000011d0| 53 74 61 74 65 22 2c 30 | 2c 71 25 0d 07 a8 17 e7 |State",0|,q%.....|
|000011e0| 20 66 72 6f 6e 74 25 20 | 8c 20 71 25 21 32 38 3d | front% |. q%!28=|
|000011f0| 2d 31 0d 07 b2 1d c8 99 | 20 22 57 69 6d 70 5f 4f |-1......| "Wimp_O|
|00001200| 70 65 6e 57 69 6e 64 6f | 77 22 2c 30 2c 71 25 0d |penWindo|w",0,q%.|
|00001210| 07 bc 05 e1 0d 07 c6 04 | 0d 07 d0 1a dd f2 63 6c |........|......cl|
|00001220| 6f 73 65 77 69 6e 64 6f | 77 28 68 61 6e 64 6c 65 |osewindo|w(handle|
|00001230| 25 29 0d 07 da 1c e7 20 | a4 6f 6b 74 6f 63 6c 6f |%)..... |.oktoclo|
|00001240| 73 65 77 28 68 61 6e 64 | 6c 65 25 29 20 8c 0d 07 |sew(hand|le%) ...|
|00001250| e4 12 20 20 71 25 21 30 | 3d 68 61 6e 64 6c 65 25 |.. q%!0|=handle%|
|00001260| 0d 07 ee 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 |... ..| "Wimp_C|
|00001270| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 30 2c 71 25 |loseWind|ow",0,q%|
|00001280| 0d 07 f8 05 cd 0d 08 02 | 05 e1 0d 08 0c 04 0d 08 |........|........|
|00001290| 16 11 dd a4 70 6f 6c 6c | 28 6d 61 73 6b 25 29 0d |....poll|(mask%).|
|000012a0| 08 20 20 c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |. .. "W|imp_Poll|
|000012b0| 22 2c 6d 61 73 6b 25 2c | 71 25 20 b8 20 61 25 0d |",mask%,|q% . a%.|
|000012c0| 08 2a 07 3d 61 25 0d 08 | 34 04 0d 08 3e 13 dd f2 |.*.=a%..|4...>...|
|000012d0| 61 63 74 69 6f 6e 28 65 | 76 6e 74 25 29 0d 08 48 |action(e|vnt%)..H|
|000012e0| 04 0d 08 52 0e c8 8e 20 | 65 76 6e 74 25 20 ca 0d |...R... |evnt% ..|
|000012f0| 08 5c 1d 20 20 c9 20 30 | 3a f2 64 6f 5f 62 61 63 |.\. . 0|:.do_bac|
|00001300| 6b 67 72 6f 75 6e 64 5f | 74 61 73 6b 0d 08 66 1d |kground_|task..f.|
|00001310| 20 20 c9 20 31 3a f2 72 | 65 64 72 61 77 77 69 6e | . 1:.r|edrawwin|
|00001320| 64 6f 77 28 71 25 21 30 | 29 0d 08 70 1f 20 20 c9 |dow(q%!0|)..p. .|
|00001330| 20 32 3a f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 71 | 2:.open|window(q|
|00001340| 25 21 30 2c b9 2c 30 29 | 0d 08 7a 1c 20 20 c9 20 |%!0,.,0)|..z. . |
|00001350| 33 3a f2 63 6c 6f 73 65 | 77 69 6e 64 6f 77 28 71 |3:.close|window(q|
|00001360| 25 21 30 29 0d 08 84 0a | 20 20 c9 20 34 3a 0d 08 |%!0)....| . 4:..|
|00001370| 8e 0a 20 20 c9 20 35 3a | 0d 08 98 37 20 20 c9 20 |.. . 5:|...7 . |
|00001380| 36 3a f2 63 6c 69 63 6b | 77 69 6e 64 6f 77 28 21 |6:.click|window(!|
|00001390| 71 25 2c 71 25 21 34 2c | 71 25 21 38 2c 71 25 21 |q%,q%!4,|q%!8,q%!|
|000013a0| 31 32 2c 71 25 21 31 36 | 2c 71 25 21 32 30 29 0d |12,q%!16|,q%!20).|
|000013b0| 08 a2 14 20 20 c9 20 37 | 3a 63 68 61 6e 67 65 64 |... . 7|:changed|
|000013c0| 25 3d b9 0d 08 ac 13 20 | 20 c9 20 38 3a f2 6b 65 |%=..... | . 8:.ke|
|000013d0| 79 70 72 65 73 73 0d 08 | b6 33 20 20 c9 20 39 3a |ypress..|.3 . 9:|
|000013e0| e7 20 63 6c 61 69 6d 6d | 65 6e 75 24 3c 3e 22 22 |. claimm|enu$<>""|
|000013f0| 20 8c 20 f2 77 68 69 63 | 68 6d 65 6e 75 28 63 6c | . .whic|hmenu(cl|
|00001400| 61 69 6d 6d 65 6e 75 24 | 29 0d 08 c0 0e 20 20 c9 |aimmenu$|).... .|
|00001410| 20 31 37 2c 31 38 3a 0d | 08 ca 05 cb 0d 08 d4 05 | 17,18:.|........|
|00001420| e1 0d 08 de 04 0d 08 e8 | 11 dd f2 72 65 63 65 69 |........|...recei|
|00001430| 76 65 28 71 25 29 0d 08 | f2 0e c8 8e 20 71 25 21 |ve(q%)..|.... q%!|
|00001440| 31 36 20 ca 0d 08 fc 37 | c9 20 30 20 20 20 20 3a |16 ....7|. 0 :|
|00001450| 24 71 25 3d 22 54 41 53 | 4b 22 3a c8 99 20 22 57 |$q%="TAS|K":.. "W|
|00001460| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 2c 74 |imp_Clos|eDown",t|
|00001470| 61 73 6b 25 2c 71 25 21 | 30 3a e0 0d 09 06 05 cb |ask%,q%!|0:......|
|00001480| 0d 09 10 05 e1 0d 09 1a | 04 0d 09 24 1c dd f2 6c |........|...$...l|
|00001490| 77 61 6f 72 69 67 69 6e | 28 62 2c f8 20 78 25 2c |waorigin|(b,. x%,|
|000014a0| f8 20 79 25 29 0d 09 2e | 1c 78 25 3d 62 21 30 2d |. y%)...|.x%=b!0-|
|000014b0| 62 21 31 36 3a 79 25 3d | 62 21 31 32 2d 62 21 32 |b!16:y%=|b!12-b!2|
|000014c0| 30 0d 09 38 05 e1 0d 09 | 42 04 0d 09 4c 48 dd a4 |0..8....|B...LH..|
|000014d0| 69 63 6f 6e 5f 63 72 65 | 61 74 65 28 77 69 6e 64 |icon_cre|ate(wind|
|000014e0| 6f 77 25 2c 6d 69 6e 78 | 25 2c 6d 69 6e 79 25 2c |ow%,minx|%,miny%,|
|000014f0| 77 69 64 74 68 25 2c 68 | 65 69 67 68 74 25 2c 66 |width%,h|eight%,f|
|00001500| 67 25 2c 62 67 25 2c 66 | 6c 67 25 2c 64 61 74 61 |g%,bg%,f|lg%,data|
|00001510| 24 29 0d 09 56 08 ea 20 | 69 25 0d 09 60 10 71 25 |$)..V.. |i%..`.q%|
|00001520| 21 30 3d 77 69 6e 64 6f | 77 25 0d 09 6a 19 71 25 |!0=windo|w%..j.q%|
|00001530| 21 34 3d 6d 69 6e 78 25 | 3a 71 25 21 38 3d 6d 69 |!4=minx%|:q%!8=mi|
|00001540| 6e 79 25 0d 09 74 2a 71 | 25 21 31 32 3d 6d 69 6e |ny%..t*q|%!12=min|
|00001550| 78 25 2b 77 69 64 74 68 | 25 3a 71 25 21 31 36 3d |x%+width|%:q%!16=|
|00001560| 6d 69 6e 79 25 2b 68 65 | 69 67 68 74 25 0d 09 7e |miny%+he|ight%..~|
|00001570| 22 71 25 21 32 30 3d 66 | 6c 67 25 20 84 20 62 67 |"q%!20=f|lg% . bg|
|00001580| 25 3c 3c 32 38 20 84 20 | 66 67 25 3c 3c 32 34 0d |%<<28 . |fg%<<24.|
|00001590| 09 88 14 e7 20 71 25 21 | 32 30 20 80 20 26 31 30 |.... q%!|20 . &10|
|000015a0| 30 20 8c 0d 09 92 14 20 | 20 69 25 3d a7 64 61 74 |0 ..... | i%=.dat|
|000015b0| 61 24 2c 22 2c 22 29 0d | 09 9c 1b 20 20 71 25 21 |a$,",").|... q%!|
|000015c0| 32 34 3d a0 28 c0 64 61 | 74 61 24 2c 69 25 2d 31 |24=.(.da|ta$,i%-1|
|000015d0| 29 29 0d 09 a6 0e 20 20 | 71 25 21 32 38 3d 2d 31 |)).... |q%!28=-1|
|000015e0| 0d 09 b0 1b 20 20 71 25 | 21 33 32 3d a0 28 c1 64 |.... q%|!32=.(.d|
|000015f0| 61 74 61 24 2c 69 25 2b | 31 29 29 0d 09 ba 05 cc |ata$,i%+|1)).....|
|00001600| 0d 09 c4 17 24 28 71 25 | 2b 32 34 29 3d c0 64 61 |....$(q%|+24)=.da|
|00001610| 74 61 24 2c 31 31 29 0d | 09 ce 05 cd 0d 09 d8 22 |ta$,11).|......."|
|00001620| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 49 |.. "Wimp|_CreateI|
|00001630| 63 6f 6e 22 2c 30 2c 71 | 25 20 b8 20 69 25 0d 09 |con",0,q|% . i%..|
|00001640| e2 07 3d 69 25 0d 09 ec | 04 0d 09 f6 23 dd f2 69 |..=i%...|....#..i|
|00001650| 63 6f 6e 5f 64 65 73 65 | 6c 65 63 74 28 68 61 6e |con_dese|lect(han|
|00001660| 64 6c 65 25 2c 69 63 6f | 6e 68 25 29 0d 0a 00 12 |dle%,ico|nh%)....|
|00001670| e7 20 69 63 6f 6e 68 25 | 3c 3e 2d 31 20 8c 0d 0a |. iconh%|<>-1 ...|
|00001680| 0a 1e 20 20 71 25 21 30 | 3d 68 61 6e 64 6c 65 25 |.. q%!0|=handle%|
|00001690| 3a 71 25 21 34 3d 69 63 | 6f 6e 68 25 0d 0a 14 1b |:q%!4=ic|onh%....|
|000016a0| 20 20 71 25 21 38 3d 26 | 32 30 30 30 30 30 3a 71 | q%!8=&|200000:q|
|000016b0| 25 21 31 32 3d 26 30 0d | 0a 1e 20 20 20 c8 99 20 |%!12=&0.|.. .. |
|000016c0| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|000016d0| 74 65 22 2c 2c 71 25 0d | 0a 28 05 cd 0d 0a 32 05 |te",,q%.|.(....2.|
|000016e0| e1 0d 0a 3c 04 0d 0a 46 | 26 dd f2 69 63 6f 6e 5f |...<...F|&..icon_|
|000016f0| 70 75 74 64 61 74 61 28 | 62 2c 77 68 25 2c 69 68 |putdata(|b,wh%,ih|
|00001700| 25 2c 74 65 78 74 24 2c | 72 64 29 0d 0a 50 13 62 |%,text$,|rd)..P.b|
|00001710| 21 30 3d 77 68 25 3a 62 | 21 34 3d 69 68 25 0d 0a |!0=wh%:b|!4=ih%..|
|00001720| 5a 1d c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |Z... "Wi|mp_GetIc|
|00001730| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 0d 0a 64 1b c8 |onState"|,,b..d..|
|00001740| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 49 63 |. "Wimp_|DeleteIc|
|00001750| 6f 6e 22 2c 2c 62 0d 0a | 6e 1e 62 21 34 3d 77 68 |on",,b..|n.b!4=wh|
|00001760| 25 3a 24 28 62 21 32 38 | 29 3d 74 65 78 74 24 3a |%:$(b!28|)=text$:|
|00001770| 62 2b 3d 34 0d 0a 78 1b | c8 99 20 22 57 69 6d 70 |b+=4..x.|.. "Wimp|
|00001780| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 2c 62 0d |_CreateI|con",,b.|
|00001790| 0a 82 36 e7 20 72 64 20 | 8c 20 c8 99 20 22 57 69 |..6. rd |. .. "Wi|
|000017a0| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|000017b0| 62 21 30 2c 62 21 34 2c | 62 21 38 2c 62 21 31 32 |b!0,b!4,|b!8,b!12|
|000017c0| 2c 62 21 31 36 0d 0a 8c | 08 62 2d 3d 34 0d 0a 96 |,b!16...|.b-=4...|
|000017d0| 05 e1 0d 0a a0 04 0d 0a | aa 35 dd f2 69 63 6f 6e |........|.5..icon|
|000017e0| 5f 70 75 74 64 61 74 61 | 28 71 25 2c 77 68 61 6e |_putdata|(q%,whan|
|000017f0| 64 6c 65 25 2c 69 68 61 | 6e 64 6c 65 25 2c 64 61 |dle%,iha|ndle%,da|
|00001800| 74 61 24 2c 72 65 64 72 | 61 77 29 0d 0a b4 11 71 |ta$,redr|aw)....q|
|00001810| 25 21 30 3d 77 68 61 6e | 64 6c 65 25 0d 0a be 11 |%!0=whan|dle%....|
|00001820| 71 25 21 34 3d 69 68 61 | 6e 64 6c 65 25 0d 0a c8 |q%!4=iha|ndle%...|
|00001830| 1e c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |... "Wim|p_GetIco|
|00001840| 6e 53 74 61 74 65 22 2c | 2c 71 25 0d 0a d2 12 24 |nState",|,q%....$|
|00001850| 28 71 25 21 32 38 29 3d | 64 61 74 61 24 0d 0a dc |(q%!28)=|data$...|
|00001860| 0e e7 20 72 65 64 72 61 | 77 20 8c 0d 0a e6 3b 20 |.. redra|w ....; |
|00001870| 20 c8 99 20 22 57 69 6d | 70 5f 46 6f 72 63 65 52 | .. "Wim|p_ForceR|
|00001880| 65 64 72 61 77 22 2c 77 | 68 61 6e 64 6c 65 25 2c |edraw",w|handle%,|
|00001890| 71 25 21 38 2c 71 25 21 | 31 32 2c 71 25 21 31 36 |q%!8,q%!|12,q%!16|
|000018a0| 2c 71 25 21 32 30 0d 0a | f0 05 cd 0d 0a fa 05 e1 |,q%!20..|........|
|000018b0| 0d 0b 04 04 0d 0b 0e 2d | dd f2 69 63 6f 6e 5f 73 |.......-|..icon_s|
|000018c0| 65 74 62 67 63 6f 6c 6f | 75 72 28 62 2c 77 68 61 |etbgcolo|ur(b,wha|
|000018d0| 6e 64 6c 65 25 2c 69 63 | 6f 6e 25 2c 63 6f 6c 25 |ndle%,ic|on%,col%|
|000018e0| 29 0d 0b 18 35 21 62 3d | 77 68 61 6e 64 6c 65 25 |)...5!b=|whandle%|
|000018f0| 3a 62 21 34 3d 69 63 6f | 6e 25 3a 62 21 38 3d 63 |:b!4=ico|n%:b!8=c|
|00001900| 6f 6c 25 3c 3c 32 38 3a | 62 21 31 32 3d 26 46 30 |ol%<<28:|b!12=&F0|
|00001910| 30 30 30 30 30 30 0d 0b | 22 1e c8 99 20 22 57 69 |000000..|"... "Wi|
|00001920| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|00001930| 2c 30 2c 62 0d 0b 2c 05 | e1 0d 0b 36 04 0d 0b 40 |,0,b..,.|...6...@|
|00001940| 2d dd f2 69 63 6f 6e 5f | 73 65 74 66 67 63 6f 6c |-..icon_|setfgcol|
|00001950| 6f 75 72 28 62 2c 77 68 | 61 6e 64 6c 65 25 2c 69 |our(b,wh|andle%,i|
|00001960| 63 6f 6e 25 2c 63 6f 6c | 25 29 0d 0b 4a 35 21 62 |con%,col|%)..J5!b|
|00001970| 3d 77 68 61 6e 64 6c 65 | 25 3a 62 21 34 3d 69 63 |=whandle|%:b!4=ic|
|00001980| 6f 6e 25 3a 62 21 38 3d | 63 6f 6c 25 3c 3c 32 34 |on%:b!8=|col%<<24|
|00001990| 3a 62 21 31 32 3d 26 30 | 46 30 30 30 30 30 30 0d |:b!12=&0|F000000.|
|000019a0| 0b 54 1e c8 99 20 22 57 | 69 6d 70 5f 53 65 74 49 |.T... "W|imp_SetI|
|000019b0| 63 6f 6e 53 74 61 74 65 | 22 2c 30 2c 62 0d 0b 5e |conState|",0,b..^|
|000019c0| 05 e1 0d 0b 68 04 0d 0b | 72 39 dd a4 69 63 6f 6e |....h...|r9..icon|
|000019d0| 5f 6e 65 77 73 70 72 69 | 74 65 28 62 2c 77 68 61 |_newspri|te(b,wha|
|000019e0| 6e 64 6c 65 25 2c 69 68 | 61 6e 64 6c 65 25 2c 6e |ndle%,ih|andle%,n|
|000019f0| 65 77 6e 61 6d 65 24 2c | 72 65 64 72 61 77 29 0d |ewname$,|redraw).|
|00001a00| 0b 7c 1d 62 21 30 3d 77 | 68 61 6e 64 6c 65 25 3a |.|.b!0=w|handle%:|
|00001a10| 62 21 34 3d 69 68 61 6e | 64 6c 65 25 0d 0b 86 1d |b!4=ihan|dle%....|
|00001a20| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|00001a30| 53 74 61 74 65 22 2c 2c | 62 0d 0b 90 1b c8 99 20 |State",,|b...... |
|00001a40| 22 57 69 6d 70 5f 44 65 | 6c 65 74 65 49 63 6f 6e |"Wimp_De|leteIcon|
|00001a50| 22 2c 2c 62 0d 0b 9a 43 | 62 21 34 3d 62 21 38 3a |",,b...C|b!4=b!8:|
|00001a60| 62 21 38 3d 62 21 31 32 | 3a 62 21 31 32 3d 62 21 |b!8=b!12|:b!12=b!|
|00001a70| 31 36 3a 62 21 31 36 3d | 62 21 32 30 3a 62 21 32 |16:b!16=|b!20:b!2|
|00001a80| 30 3d 62 21 32 34 3a 24 | 28 62 2b 32 34 29 3d 6e |0=b!24:$|(b+24)=n|
|00001a90| 65 77 6e 61 6d 65 24 0d | 0b a4 26 c8 99 20 22 57 |ewname$.|..&.. "W|
|00001aa0| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 22 2c |imp_Crea|teIcon",|
|00001ab0| 2c 62 20 b8 20 69 68 61 | 6e 64 6c 65 25 0d 0b ae |,b . iha|ndle%...|
|00001ac0| 3a e7 20 72 65 64 72 61 | 77 20 8c 20 c8 99 20 22 |:. redra|w . .. "|
|00001ad0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00001ae0| 22 2c 62 21 30 2c 62 21 | 34 2c 62 21 38 2c 62 21 |",b!0,b!|4,b!8,b!|
|00001af0| 31 32 2c 62 21 31 36 0d | 0b b8 0d 3d 69 68 61 6e |12,b!16.|...=ihan|
|00001b00| 64 6c 65 25 0d 0b c2 04 | 0d 0b cc 28 dd a4 69 63 |dle%....|...(..ic|
|00001b10| 6f 6e 5f 67 65 74 64 61 | 74 61 28 71 25 2c 77 68 |on_getda|ta(q%,wh|
|00001b20| 61 6e 64 6c 65 25 2c 69 | 68 61 6e 64 6c 65 25 29 |andle%,i|handle%)|
|00001b30| 0d 0b d6 11 71 25 21 30 | 3d 77 68 61 6e 64 6c 65 |....q%!0|=whandle|
|00001b40| 25 0d 0b e0 11 71 25 21 | 34 3d 69 68 61 6e 64 6c |%....q%!|4=ihandl|
|00001b50| 65 25 0d 0b ea 1e c8 99 | 20 22 57 69 6d 70 5f 47 |e%......| "Wimp_G|
|00001b60| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|00001b70| 0d 0b f4 0d 3d 24 28 71 | 25 21 32 38 29 0d 0b fe |....=$(q|%!28)...|
|00001b80| 04 0d 0c 08 45 dd f2 63 | 61 72 65 74 5f 73 65 74 |....E..c|aret_set|
|00001b90| 70 6f 73 69 74 69 6f 6e | 28 77 68 61 6e 64 6c 65 |position|(whandle|
|00001ba0| 25 2c 69 68 61 6e 64 6c | 65 25 2c 78 6f 66 66 25 |%,ihandl|e%,xoff%|
|00001bb0| 2c 79 6f 66 66 25 2c 68 | 65 69 67 68 74 25 2c 69 |,yoff%,h|eight%,i|
|00001bc0| 6e 64 65 78 25 29 0d 0c | 12 4b c8 99 20 22 57 69 |ndex%)..|.K.. "Wi|
|00001bd0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00001be0| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 25 2c 69 68 |ion",wha|ndle%,ih|
|00001bf0| 61 6e 64 6c 65 25 2c 78 | 6f 66 66 25 2c 79 6f 66 |andle%,x|off%,yof|
|00001c00| 66 25 2c 68 65 69 67 68 | 74 25 2c 69 6e 64 65 78 |f%,heigh|t%,index|
|00001c10| 25 0d 0c 1c 05 e1 0d 0c | 26 04 0d 0c 30 0d dd f2 |%.......|&...0...|
|00001c20| 6e 65 77 76 61 6c 73 0d | 0c 3a 17 67 74 78 3d 71 |newvals.|.:.gtx=q|
|00001c30| 25 21 33 36 3a 67 74 79 | 3d 71 25 21 34 30 0d 0c |%!36:gty|=q%!40..|
|00001c40| 44 15 77 62 78 3d 71 25 | 21 34 3a 77 62 79 3d 71 |D.wbx=q%|!4:wby=q|
|00001c50| 25 21 38 0d 0c 4e 17 77 | 74 78 3d 71 25 21 31 32 |%!8..N.w|tx=q%!12|
|00001c60| 3a 77 74 79 3d 71 25 21 | 31 36 0d 0c 58 17 78 73 |:wty=q%!|16..X.xs|
|00001c70| 63 3d 71 25 21 32 30 3a | 79 73 63 3d 71 25 21 32 |c=q%!20:|ysc=q%!2|
|00001c80| 34 0d 0c 62 21 68 70 3d | 77 74 78 2d 77 62 78 3a |4..b!hp=|wtx-wbx:|
|00001c90| 76 70 3d 77 74 79 2d 77 | 62 79 3a 65 62 78 3d 78 |vp=wty-w|by:ebx=x|
|00001ca0| 73 63 0d 0c 6c 21 65 74 | 78 3d 78 73 63 2b 68 70 |sc..l!et|x=xsc+hp|
|00001cb0| 3a 65 74 79 3d 79 73 63 | 3a 65 62 79 3d 79 73 63 |:ety=ysc|:eby=ysc|
|00001cc0| 2d 76 70 0d 0c 76 05 e1 | 0d 0c 80 04 0d 0c 8a 32 |-vp..v..|.......2|
|00001cd0| dd f2 64 65 66 69 6e 65 | 5f 6d 65 6e 75 5f 74 65 |..define|_menu_te|
|00001ce0| 78 74 28 74 65 78 74 24 | 2c 6e 2c 77 2c 74 2c 64 |xt(text$|,n,w,t,d|
|00001cf0| 2c 73 2c 66 6c 61 67 73 | 2c 73 6d 2c 6c 29 0d 0c |,s,flags|,sm,l)..|
|00001d00| 94 12 74 65 78 74 24 28 | 6e 29 3d 74 65 78 74 24 |..text$(|n)=text$|
|00001d10| 0d 0c 9e 10 73 65 74 74 | 69 6e 67 28 6e 29 3d 30 |....sett|ing(n)=0|
|00001d20| 0d 0c a8 38 e7 20 77 20 | 8c 20 73 65 74 74 69 6e |...8. w |. settin|
|00001d30| 67 28 6e 29 3d 73 65 74 | 74 69 6e 67 28 6e 29 20 |g(n)=set|ting(n) |
|00001d40| 84 20 26 30 34 3a 66 6c | 61 67 73 3d 66 6c 61 67 |. &04:fl|ags=flag|
|00001d50| 73 20 84 20 26 31 30 30 | 0d 0c b2 25 e7 20 74 20 |s . &100|...%. t |
|00001d60| 8c 20 73 65 74 74 69 6e | 67 28 6e 29 3d 73 65 74 |. settin|g(n)=set|
|00001d70| 74 69 6e 67 28 6e 29 20 | 84 20 26 30 31 0d 0c bc |ting(n) |. &01...|
|00001d80| 25 e7 20 64 20 8c 20 73 | 65 74 74 69 6e 67 28 6e |%. d . s|etting(n|
|00001d90| 29 3d 73 65 74 74 69 6e | 67 28 6e 29 20 84 20 26 |)=settin|g(n) . &|
|00001da0| 30 32 0d 0c c6 25 e7 20 | 6c 20 8c 20 73 65 74 74 |02...%. |l . sett|
|00001db0| 69 6e 67 28 6e 29 3d 73 | 65 74 74 69 6e 67 28 6e |ing(n)=s|etting(n|
|00001dc0| 29 20 84 20 26 38 30 0d | 0c d0 1f e7 20 73 20 8c |) . &80.|.... s .|
|00001dd0| 20 66 6c 61 67 73 3d 66 | 6c 61 67 73 20 84 20 26 | flags=f|lags . &|
|00001de0| 34 30 30 30 30 30 0d 0c | da 12 66 6c 61 67 73 28 |400000..|..flags(|
|00001df0| 6e 29 3d 66 6c 61 67 73 | 0d 0c e4 11 73 75 62 6d |n)=flags|....subm|
|00001e00| 65 6e 75 28 6e 29 3d 73 | 6d 0d 0c ee 05 e1 0d 0c |enu(n)=s|m.......|
|00001e10| f8 04 0d 0d 02 26 dd f2 | 63 72 65 61 74 65 5f 6d |.....&..|create_m|
|00001e20| 65 6e 75 28 74 69 74 6c | 65 24 2c 6e 2c 77 69 64 |enu(titl|e$,n,wid|
|00001e30| 74 68 25 2c 78 2c 79 29 | 0d 0d 0c 0d 6d 62 25 3d |th%,x,y)|....mb%=|
|00001e40| 6d 65 6e 75 25 0d 0d 16 | 0f 6d 65 6e 75 73 3d 30 |menu%...|.menus=0|
|00001e50| 3a 71 3d 30 0d 0d 20 05 | f5 0d 0d 2a 21 20 20 6d |:q=0.. .|...*! m|
|00001e60| 65 6e 75 70 6f 73 28 6d | 65 6e 75 73 29 3d 6d 62 |enupos(m|enus)=mb|
|00001e70| 25 3a 6d 65 6e 75 73 2b | 3d 31 0d 0d 34 11 20 20 |%:menus+|=1..4. |
|00001e80| 24 6d 62 25 3d 74 69 74 | 6c 65 24 0d 0d 3e 0e 20 |$mb%=tit|le$..>. |
|00001e90| 20 6d 62 25 3f 31 32 3d | 37 0d 0d 48 0e 20 20 6d | mb%?12=|7..H. m|
|00001ea0| 62 25 3f 31 33 3d 32 0d | 0d 52 0e 20 20 6d 62 25 |b%?13=2.|.R. mb%|
|00001eb0| 3f 31 34 3d 37 0d 0d 5c | 0e 20 20 6d 62 25 3f 31 |?14=7..\|. mb%?1|
|00001ec0| 35 3d 30 0d 0d 66 13 20 | 20 6d 62 25 21 31 36 3d |5=0..f. | mb%!16=|
|00001ed0| 77 69 64 74 68 25 0d 0d | 70 27 20 20 6d 62 25 21 |width%..|p' mb%!|
|00001ee0| 32 30 3d 34 30 20 3a f4 | 20 68 65 69 67 68 74 20 |20=40 :.| height |
|00001ef0| 6f 66 20 6d 65 6e 75 20 | 69 74 65 6d 73 0d 0d 7a |of menu |items..z|
|00001f00| 41 20 20 6d 62 25 21 32 | 34 3d 30 20 20 3a f4 20 |A mb%!2|4=0 :. |
|00001f10| 76 65 72 74 69 63 61 6c | 20 67 61 70 20 62 65 74 |vertical| gap bet|
|00001f20| 77 65 65 6e 20 69 74 65 | 6d 73 20 28 61 6c 73 6f |ween ite|ms (also|
|00001f30| 20 74 6f 70 20 26 20 62 | 6f 74 74 6f 6d 29 0d 0d | top & b|ottom)..|
|00001f40| 84 14 20 20 69 74 65 6d | 70 74 72 3d 6d 62 25 2b |.. item|ptr=mb%+|
|00001f50| 32 38 0d 0d 8e 07 20 20 | f5 0d 0d 98 1c 20 20 20 |28.... |..... |
|00001f60| 20 69 74 65 6d 70 74 72 | 21 30 3d 73 65 74 74 69 | itemptr|!0=setti|
|00001f70| 6e 67 28 71 29 0d 0d a2 | 18 20 20 20 20 72 65 66 |ng(q)...|. ref|
|00001f80| 28 71 29 3d 69 74 65 6d | 70 74 72 2b 34 0d 0d ac |(q)=item|ptr+4...|
|00001f90| 2a 20 20 20 20 69 74 65 | 6d 70 74 72 21 38 3d 66 |* ite|mptr!8=f|
|00001fa0| 6c 61 67 73 28 71 29 20 | 84 20 30 3c 3c 32 38 20 |lags(q) |. 0<<28 |
|00001fb0| 84 20 37 3c 3c 32 34 0d | 0d b6 1f 20 20 20 20 e7 |. 7<<24.|... .|
|00001fc0| 20 28 66 6c 61 67 73 28 | 71 29 20 80 20 26 31 30 | (flags(|q) . &10|
|00001fd0| 30 29 3d 30 20 8c 0d 0d | c0 20 20 20 20 20 20 20 |0)=0 ...|. |
|00001fe0| 24 28 69 74 65 6d 70 74 | 72 2b 31 32 29 3d 74 65 |$(itempt|r+12)=te|
|00001ff0| 78 74 24 28 71 29 0d 0d | ca 09 20 20 20 20 cc 0d |xt$(q)..|.. ..|
|00002000| 0d d4 1c 20 20 20 20 20 | 20 70 6f 73 3d a7 74 65 |... | pos=.te|
|00002010| 78 74 24 28 71 29 2c 22 | 28 22 29 0d 0d de 28 20 |xt$(q),"|(")...( |
|00002020| 20 20 20 20 20 69 74 65 | 6d 70 74 72 21 31 32 3d | ite|mptr!12=|
|00002030| a0 28 c0 74 65 78 74 24 | 28 71 29 2c 70 6f 73 2d |.(.text$|(q),pos-|
|00002040| 31 29 29 0d 0d e8 17 20 | 20 20 20 20 20 69 74 65 |1)).... | ite|
|00002050| 6d 70 74 72 21 31 36 3d | 2d 31 0d 0d f2 32 20 20 |mptr!16=|-1...2 |
|00002060| 20 20 20 20 69 74 65 6d | 70 74 72 21 32 30 3d a0 | item|ptr!20=.|
|00002070| 28 c2 74 65 78 74 24 28 | 71 29 2c a9 28 74 65 78 |(.text$(|q),.(tex|
|00002080| 74 24 28 71 29 29 2d 70 | 6f 73 29 29 0d 0d fc 09 |t$(q))-p|os))....|
|00002090| 20 20 20 20 cd 0d 0e 06 | 18 20 20 20 20 69 74 65 | ....|. ite|
|000020a0| 6d 70 74 72 2b 3d 32 34 | 3a 71 2b 3d 31 0d 0e 10 |mptr+=24|:q+=1...|
|000020b0| 1e 20 20 fd 20 28 73 65 | 74 74 69 6e 67 28 71 2d |. . (se|tting(q-|
|000020c0| 31 29 20 80 20 26 38 30 | 29 3e 30 0d 0e 1a 11 20 |1) . &80|)>0.... |
|000020d0| 20 6d 62 25 3d 69 74 65 | 6d 70 74 72 0d 0e 24 23 | mb%=ite|mptr..$#|
|000020e0| 20 20 e7 20 71 3c 3e 6e | 20 8c 20 74 69 74 6c 65 | . q<>n| . title|
|000020f0| 24 3d 74 65 78 74 24 28 | 71 29 3a 71 2b 3d 31 0d |$=text$(|q):q+=1.|
|00002100| 0e 2e 09 fd 20 71 3d 6e | 0d 0e 38 04 0d 0e 42 0f |.... q=n|..8...B.|
|00002110| e3 20 71 3d 30 20 b8 20 | 6e 2d 31 0d 0e 4c 29 20 |. q=0 . |n-1..L) |
|00002120| 20 e7 20 73 75 62 6d 65 | 6e 75 28 71 29 3e 30 20 | . subme|nu(q)>0 |
|00002130| 80 20 73 75 62 6d 65 6e | 75 28 71 29 3c 6d 65 6e |. submen|u(q)<men|
|00002140| 75 73 20 8c 0d 0e 56 23 | 20 20 20 20 21 72 65 66 |us ...V#| !ref|
|00002150| 28 71 29 3d 6d 65 6e 75 | 70 6f 73 28 73 75 62 6d |(q)=menu|pos(subm|
|00002160| 65 6e 75 28 71 29 29 0d | 0e 60 07 20 20 cc 0d 0e |enu(q)).|.`. ...|
|00002170| 6a 48 20 20 20 20 21 72 | 65 66 28 71 29 3d 73 75 |jH !r|ef(q)=su|
|00002180| 62 6d 65 6e 75 28 71 29 | 3a f4 20 77 61 73 20 2d |bmenu(q)|:. was -|
|00002190| 31 20 69 2e 65 2e 20 73 | 75 62 6d 65 6e 75 20 64 |1 i.e. s|ubmenu d|
|000021a0| 69 73 61 6c 6c 6f 77 65 | 64 21 20 54 68 69 73 20 |isallowe|d! This |
|000021b0| 63 68 61 6e 67 65 0d 0e | 74 3e 20 20 20 20 20 20 |change..|t> |
|000021c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000021d0| 3a f4 20 61 6c 6c 6f 77 | 73 20 61 20 77 69 6e 64 |:. allow|s a wind|
|000021e0| 6f 77 20 68 61 6e 64 6c | 65 20 74 6f 20 62 65 20 |ow handl|e to be |
|000021f0| 75 73 65 64 0d 0e 7e 07 | 20 20 cd 0d 0e 88 07 ed |used..~.| ......|
|00002200| 20 71 0d 0e 92 23 c8 99 | 20 22 57 69 6d 70 5f 43 | q...#..| "Wimp_C|
|00002210| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 6d 65 6e 75 |reateMen|u",,menu|
|00002220| 25 2c 78 2c 79 0d 0e 9c | 05 e1 0d 0e a6 04 0d 0e |%,x,y...|........|
|00002230| b0 1d dd f2 6f 70 65 6e | 74 65 6d 70 6c 61 74 65 |....open|template|
|00002240| 66 69 6c 65 28 46 49 4c | 45 24 29 0d 0e ba 21 c8 |file(FIL|E$)...!.|
|00002250| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |. "Wimp_|OpenTemp|
|00002260| 6c 61 74 65 22 2c 2c 46 | 49 4c 45 24 0d 0e c4 05 |late",,F|ILE$....|
|00002270| e1 0d 0e ce 04 0d 0e d8 | 19 dd f2 6c 6f 61 64 74 |........|...loadt|
|00002280| 65 6d 70 6c 61 74 65 28 | 6e 61 6d 65 24 29 0d 0e |emplate(|name$)..|
|00002290| e2 13 ea 20 74 79 70 65 | 25 2c 70 6f 73 25 2c 78 |... type|%,pos%,x|
|000022a0| 25 0d 0e ec 4c c8 99 20 | 22 57 69 6d 70 5f 4c 6f |%...L.. |"Wimp_Lo|
|000022b0| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 71 25 2c |adTempla|te",,q%,|
|000022c0| 69 70 74 72 25 2c 69 65 | 6e 64 25 2c 2d 31 2c 6e |iptr%,ie|nd%,-1,n|
|000022d0| 61 6d 65 24 2c 30 20 b8 | 20 74 79 70 65 25 2c 2c |ame$,0 .| type%,,|
|000022e0| 69 70 74 72 25 2c 2c 2c | 2c 70 6f 73 25 0d 0e f6 |iptr%,,,|,pos%...|
|000022f0| 05 e1 0d 0f 00 04 0d 0f | 0a 17 dd f2 63 6c 6f 73 |........|....clos|
|00002300| 65 74 65 6d 70 6c 61 74 | 65 66 69 6c 65 0d 0f 14 |etemplat|efile...|
|00002310| 1b c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 54 |... "Wim|p_CloseT|
|00002320| 65 6d 70 6c 61 74 65 22 | 0d 0f 1e 05 e1 0d 0f 28 |emplate"|.......(|
|00002330| 04 0d 0f 32 22 dd f2 6d | 6f 75 73 65 5f 72 65 63 |...2"..m|ouse_rec|
|00002340| 74 61 6e 67 6c 65 28 78 | 25 2c 79 25 2c 77 25 2c |tangle(x|%,y%,w%,|
|00002350| 68 25 29 0d 0f 3c 15 c8 | 97 20 c8 93 20 78 25 2c |h%)..<..|. .. x%,|
|00002360| 79 25 2c 77 25 2c 68 25 | 0d 0f 46 05 e1 0d 0f 50 |y%,w%,h%|..F....P|
|00002370| 04 0d 0f 5a 1d dd f2 6d | 6f 75 73 65 5f 6c 69 6d |...Z...m|ouse_lim|
|00002380| 69 74 28 62 2c 77 68 61 | 6e 64 6c 65 25 29 0d 0f |it(b,wha|ndle%)..|
|00002390| 64 2c 62 21 30 3d 77 68 | 61 6e 64 6c 65 25 3a c8 |d,b!0=wh|andle%:.|
|000023a0| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|000023b0| 77 53 74 61 74 65 22 2c | 2c 62 0d 0f 6e 2f f2 6d |wState",|,b..n/.m|
|000023c0| 6f 75 73 65 5f 72 65 63 | 74 61 6e 67 6c 65 28 62 |ouse_rec|tangle(b|
|000023d0| 21 34 2c 62 21 38 2c 62 | 21 31 32 2d 62 21 34 2c |!4,b!8,b|!12-b!4,|
|000023e0| 62 21 31 36 2d 62 21 38 | 29 0d 0f 78 05 e1 0d 0f |b!16-b!8|)..x....|
|000023f0| 82 04 0d 0f 8c 14 dd f2 | 64 65 6c 61 79 28 73 65 |........|delay(se|
|00002400| 63 6f 6e 64 73 29 0d 0f | 96 0a ea 20 74 69 6d 65 |conds)..|... time|
|00002410| 0d 0f a0 1e 74 69 6d 65 | 20 3d 20 91 20 2b 20 28 |....time| = . + (|
|00002420| 73 65 63 6f 6e 64 73 20 | 2a 20 31 30 30 29 0d 0f |seconds |* 100)..|
|00002430| aa 05 f5 0d 0f b4 0e fd | 20 91 20 3e 20 74 69 6d |........| . > tim|
|00002440| 65 0d 0f be 05 e1 0d 0f | c8 04 0d 0f d2 19 dd a4 |e.......|........|
|00002450| 75 70 70 65 72 5f 63 61 | 73 65 28 73 74 72 69 6e |upper_ca|se(strin|
|00002460| 67 24 29 0d 0f dc 0b ea | 20 6c 6f 6f 70 25 0d 0f |g$).....| loop%..|
|00002470| e6 16 e7 20 a9 28 73 74 | 72 69 6e 67 24 29 20 3e |... .(st|ring$) >|
|00002480| 20 30 20 8c 0d 0f f0 1d | 20 e3 20 6c 6f 6f 70 25 | 0 .....| . loop%|
|00002490| 20 3d 20 31 20 b8 20 a9 | 28 73 74 72 69 6e 67 24 | = 1 . .|(string$|
|000024a0| 29 0d 0f fa 3a 20 20 20 | e7 20 c1 73 74 72 69 6e |)...: |. .strin|
|000024b0| 67 24 2c 6c 6f 6f 70 25 | 2c 31 29 3e 3d 22 61 22 |g$,loop%|,1)>="a"|
|000024c0| 20 80 20 c1 73 74 72 69 | 6e 67 24 2c 6c 6f 6f 70 | . .stri|ng$,loop|
|000024d0| 25 2c 31 29 3c 3d 22 7a | 22 20 8c 0d 10 04 3a 20 |%,1)<="z|" ....: |
|000024e0| 20 20 20 20 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f | .str|ing$,loo|
|000024f0| 70 25 2c 31 29 20 3d 20 | bd 28 97 28 c1 73 74 72 |p%,1) = |.(.(.str|
|00002500| 69 6e 67 24 2c 6c 6f 6f | 70 25 2c 31 29 29 20 80 |ing$,loo|p%,1)) .|
|00002510| 20 26 44 46 29 0d 10 0e | 08 20 20 20 cd 0d 10 18 | &DF)...|. ....|
|00002520| 0c 20 ed 20 6c 6f 6f 70 | 25 0d 10 22 05 cd 0d 10 |. . loop|%.."....|
|00002530| 2c 0d 3d 20 73 74 72 69 | 6e 67 24 0d 10 36 04 0d |,.= stri|ng$..6..|
|00002540| 10 40 27 dd f2 57 69 6e | 64 6f 77 5f 52 65 54 69 |.@'..Win|dow_ReTi|
|00002550| 74 6c 65 28 62 2c 77 68 | 61 6e 64 6c 65 25 2c 74 |tle(b,wh|andle%,t|
|00002560| 69 74 6c 65 24 29 0d 10 | 4a 0b ea 20 77 6f 62 6c |itle$)..|J.. wobl|
|00002570| 6b 0d 10 54 0d de 20 77 | 6f 62 6c 6b 20 35 0d 10 |k..T.. w|oblk 5..|
|00002580| 5e 10 62 21 30 3d 77 68 | 61 6e 64 6c 65 25 0d 10 |^.b!0=wh|andle%..|
|00002590| 68 1e c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |h... "Wi|mp_GetWi|
|000025a0| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 0d 10 72 15 |ndowInfo|",,b..r.|
|000025b0| 24 28 21 28 62 2b 37 36 | 29 29 3d 74 69 74 6c 65 |$(!(b+76|))=title|
|000025c0| 24 0d 10 7c 14 77 6f 62 | 6c 6b 21 30 3d 77 68 61 |$..|.wob|lk!0=wha|
|000025d0| 6e 64 6c 65 25 0d 10 86 | 25 c8 99 20 22 57 69 6d |ndle%...|%.. "Wim|
|000025e0| 70 5f 47 65 74 57 69 6e | 64 6f 77 4f 75 74 6c 69 |p_GetWin|dowOutli|
|000025f0| 6e 65 22 2c 2c 77 6f 62 | 6c 6b 0d 10 90 44 c8 99 |ne",,wob|lk...D..|
|00002600| 20 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 | "Wimp_F|orceRedr|
|00002610| 61 77 22 2c 2d 31 2c 77 | 6f 62 6c 6b 21 34 2c 28 |aw",-1,w|oblk!4,(|
|00002620| 77 6f 62 6c 6b 21 31 36 | 29 2d 34 30 2c 77 6f 62 |woblk!16|)-40,wob|
|00002630| 6c 6b 21 31 32 2c 77 6f | 62 6c 6b 21 31 36 0d 10 |lk!12,wo|blk!16..|
|00002640| 9a 05 e1 0d 10 a4 04 0d | 10 ae 11 dd a4 6c 65 61 |........|.....lea|
|00002650| 66 28 70 61 74 68 24 29 | 0d 10 b8 12 c8 95 20 a7 |f(path$)|...... .|
|00002660| 70 61 74 68 24 2c 22 2e | 22 29 0d 10 c2 21 20 20 |path$,".|")...! |
|00002670| 70 61 74 68 24 3d c1 70 | 61 74 68 24 2c a7 70 61 |path$=.p|ath$,.pa|
|00002680| 74 68 24 2c 22 2e 22 29 | 2b 31 29 0d 10 cc 05 ce |th$,".")|+1).....|
|00002690| 0d 10 d6 0a 3d 70 61 74 | 68 24 0d 10 e0 04 0d 10 |....=pat|h$......|
|000026a0| ea 10 dd a4 67 6e 61 6d | 65 28 70 74 72 29 0d 10 |....gnam|e(ptr)..|
|000026b0| f4 09 66 24 3d 22 22 0d | 10 fe 19 c8 95 20 3f 70 |..f$="".|..... ?p|
|000026c0| 74 72 3c 3e 30 20 80 20 | 3f 70 74 72 3c 3e 31 33 |tr<>0 . |?ptr<>13|
|000026d0| 0d 11 08 18 20 20 66 24 | 3d 66 24 2b bd 3f 70 74 |.... f$|=f$+.?pt|
|000026e0| 72 3a 70 74 72 2b 3d 31 | 0d 11 12 05 ce 0d 11 1c |r:ptr+=1|........|
|000026f0| 07 3d 66 24 0d 11 26 04 | 0d 11 30 1a dd a4 66 69 |.=f$..&.|..0...fi|
|00002700| 6c 65 5f 6c 65 6e 67 74 | 68 28 6f 62 6a 65 63 74 |le_lengt|h(object|
|00002710| 24 29 0d 11 3a 37 ea 20 | 74 79 70 65 25 2c 6c 6f |$)..:7. |type%,lo|
|00002720| 61 64 5f 61 64 64 72 25 | 2c 65 78 65 63 5f 61 64 |ad_addr%|,exec_ad|
|00002730| 64 72 25 2c 6c 65 6e 67 | 74 68 25 2c 61 74 74 73 |dr%,leng|th%,atts|
|00002740| 25 2c 73 74 72 69 6e 67 | 24 0d 11 44 47 c8 99 20 |%,string|$..DG.. |
|00002750| 22 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 6f 62 6a 65 |"OS_File|",5,obje|
|00002760| 63 74 24 20 b8 20 74 79 | 70 65 25 2c 2c 6c 6f 61 |ct$ . ty|pe%,,loa|
|00002770| 64 5f 61 64 64 72 25 2c | 65 78 65 63 5f 61 64 64 |d_addr%,|exec_add|
|00002780| 72 25 2c 6c 65 6e 67 74 | 68 25 2c 61 74 74 73 25 |r%,lengt|h%,atts%|
|00002790| 0d 11 4e 0c 3d 6c 65 6e | 67 74 68 25 0d 11 58 04 |..N.=len|gth%..X.|
|000027a0| 0d 11 62 13 dd a4 66 69 | 6c 65 5f 64 61 74 65 28 |..b...fi|le_date(|
|000027b0| 46 24 29 0d 11 6c 0e ea | 20 4c 25 2c 41 25 2c 54 |F$)..l..| L%,A%,T|
|000027c0| 25 0d 11 76 17 24 66 62 | 75 66 66 65 72 25 3d c4 |%..v.$fb|uffer%=.|
|000027d0| 32 38 2c bd 28 30 29 29 | 0d 11 80 2f c8 99 20 22 |28,.(0))|.../.. "|
|000027e0| 4f 53 5f 46 69 6c 65 22 | 2c 35 2c 46 24 20 b8 20 |OS_File"|,5,F$ . |
|000027f0| 54 25 2c 2c 6c 61 64 64 | 72 25 2c 65 61 64 64 72 |T%,,ladd|r%,eaddr|
|00002800| 25 2c 4c 25 2c 41 25 0d | 11 8a 3b f4 20 6c 6f 61 |%,L%,A%.|..;. loa|
|00002810| 64 20 61 6e 64 20 65 78 | 65 63 75 74 69 6f 6e 20 |d and ex|ecution |
|00002820| 61 64 64 72 65 73 73 65 | 73 20 61 72 65 2c 20 69 |addresse|s are, i|
|00002830| 6e 20 66 61 63 74 2c 20 | 74 69 6d 65 20 73 74 61 |n fact, |time sta|
|00002840| 6d 70 0d 11 94 19 66 64 | 61 74 65 25 3f 34 3d 6c |mp....fd|ate%?4=l|
|00002850| 61 64 64 72 25 20 80 20 | 26 46 46 0d 11 9e 1d 66 |addr% . |&FF....f|
|00002860| 64 61 74 65 25 3f 33 3d | 65 61 64 64 72 25 3e 3e |date%?3=|eaddr%>>|
|00002870| 32 34 20 80 20 26 46 46 | 0d 11 a8 1d 66 64 61 74 |24 . &FF|....fdat|
|00002880| 65 25 3f 32 3d 65 61 64 | 64 72 25 3e 3e 31 36 20 |e%?2=ead|dr%>>16 |
|00002890| 80 20 26 46 46 0d 11 b2 | 1d 66 64 61 74 65 25 3f |. &FF...|.fdate%?|
|000028a0| 31 3d 65 61 64 64 72 25 | 3e 3e 38 20 20 80 20 26 |1=eaddr%|>>8 . &|
|000028b0| 46 46 0d 11 bc 1d 66 64 | 61 74 65 25 3f 30 3d 65 |FF....fd|ate%?0=e|
|000028c0| 61 64 64 72 25 20 20 20 | 20 20 80 20 26 46 46 0d |addr% | . &FF.|
|000028d0| 11 c6 3c c8 99 20 22 4f | 53 5f 43 6f 6e 76 65 72 |..<.. "O|S_Conver|
|000028e0| 74 53 74 61 6e 64 61 72 | 64 44 61 74 65 41 6e 64 |tStandar|dDateAnd|
|000028f0| 54 69 6d 65 22 2c 20 66 | 64 61 74 65 25 2c 20 66 |Time", f|date%, f|
|00002900| 62 75 66 66 65 72 25 2c | 20 32 38 0d 11 d0 0e 3d |buffer%,| 28....=|
|00002910| 24 66 62 75 66 66 65 72 | 25 0d 11 da 04 0d 11 e4 |$fbuffer|%.......|
|00002920| 19 dd a4 75 70 70 65 72 | 5f 63 61 73 65 28 73 74 |...upper|_case(st|
|00002930| 72 69 6e 67 24 29 0d 11 | ee 0b ea 20 6c 6f 6f 70 |ring$)..|... loop|
|00002940| 25 0d 11 f8 16 e7 20 a9 | 28 73 74 72 69 6e 67 24 |%..... .|(string$|
|00002950| 29 20 3e 20 30 20 8c 0d | 12 02 1d 20 e3 20 6c 6f |) > 0 ..|... . lo|
|00002960| 6f 70 25 20 3d 20 31 20 | b8 20 a9 28 73 74 72 69 |op% = 1 |. .(stri|
|00002970| 6e 67 24 29 0d 12 0c 3a | 20 20 20 e7 20 c1 73 74 |ng$)...:| . .st|
|00002980| 72 69 6e 67 24 2c 6c 6f | 6f 70 25 2c 31 29 3e 3d |ring$,lo|op%,1)>=|
|00002990| 22 61 22 20 80 20 c1 73 | 74 72 69 6e 67 24 2c 6c |"a" . .s|tring$,l|
|000029a0| 6f 6f 70 25 2c 31 29 3c | 3d 22 7a 22 20 8c 0d 12 |oop%,1)<|="z" ...|
|000029b0| 16 3a 20 20 20 20 20 c1 | 73 74 72 69 6e 67 24 2c |.: .|string$,|
|000029c0| 6c 6f 6f 70 25 2c 31 29 | 20 3d 20 bd 28 97 28 c1 |loop%,1)| = .(.(.|
|000029d0| 73 74 72 69 6e 67 24 2c | 6c 6f 6f 70 25 2c 31 29 |string$,|loop%,1)|
|000029e0| 29 20 80 20 26 44 46 29 | 0d 12 20 08 20 20 20 cd |) . &DF)|.. . .|
|000029f0| 0d 12 2a 0c 20 ed 20 6c | 6f 6f 70 25 0d 12 34 05 |..*. . l|oop%..4.|
|00002a00| cd 0d 12 3e 0d 3d 20 73 | 74 72 69 6e 67 24 0d 12 |...>.= s|tring$..|
|00002a10| 48 04 0d 12 52 4c f4 20 | 2d 2d 2d 2d 2d 2d 2d 2d |H...RL. |--------|
|00002a20| 2d 2d 2d 20 52 6f 75 74 | 69 6e 65 73 20 74 6f 20 |--- Rout|ines to |
|00002a30| 63 72 65 61 74 65 20 61 | 20 62 75 66 66 65 72 20 |create a| buffer |
|00002a40| 61 72 65 61 20 69 6e 20 | 74 68 65 20 52 4d 41 20 |area in |the RMA |
|00002a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 12 |--------|------..|
|00002a60| 5c 04 0d 12 66 15 dd a4 | 42 75 66 66 5f 43 72 65 |\...f...|Buff_Cre|
|00002a70| 61 74 65 28 6c 25 29 0d | 12 70 0e ea 20 66 25 2c |ate(l%).|.p.. f%,|
|00002a80| 70 25 2c 6e 25 0d 12 7a | 25 e7 20 6c 25 83 34 3c |p%,n%..z|%. l%.4<|
|00002a90| 3e 30 20 8c 20 6e 25 3d | 28 6c 25 81 34 2b 31 29 |>0 . n%=|(l%.4+1)|
|00002aa0| 2a 34 20 8b 20 6e 25 3d | 6c 25 0d 12 84 23 c8 99 |*4 . n%=|l%...#..|
|00002ab0| 20 22 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 36 2c 2c | "OS_Mod|ule",6,,|
|00002ac0| 2c 6e 25 20 b8 20 2c 2c | 70 25 3b 66 25 0d 12 8e |,n% . ,,|p%;f%...|
|00002ad0| 14 e7 20 28 66 25 80 31 | 29 3c 3e a3 20 8c 20 3d |.. (f%.1|)<>. . =|
|00002ae0| 30 0d 12 98 0a 21 70 25 | 3d 6c 25 0d 12 a2 07 3d |0....!p%|=l%....=|
|00002af0| 70 25 0d 12 ac 04 0d 12 | b6 14 dd f2 42 75 66 66 |p%......|....Buff|
|00002b00| 5f 53 63 72 61 70 28 70 | 25 29 0d 12 c0 18 c8 99 |_Scrap(p|%)......|
|00002b10| 20 22 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 37 2c 2c | "OS_Mod|ule",7,,|
|00002b20| 70 25 0d 12 ca 05 e1 0d | 12 d4 04 0d 12 de 1b dd |p%......|........|
|00002b30| f2 42 75 66 66 5f 45 6e | 6c 61 72 67 65 28 f8 20 |.Buff_En|large(. |
|00002b40| 70 25 2c 6c 25 29 0d 12 | e8 08 ea 20 6e 25 0d 12 |p%,l%)..|... n%..|
|00002b50| f2 1f e7 20 70 25 3d 30 | 20 8c 20 70 25 3d a4 42 |... p%=0| . p%=.B|
|00002b60| 75 66 66 5f 43 72 65 61 | 74 65 28 34 29 0d 12 fc |uff_Crea|te(4)...|
|00002b70| 17 6e 25 3d a4 42 75 66 | 66 5f 43 72 65 61 74 65 |.n%=.Buf|f_Create|
|00002b80| 28 6c 25 29 0d 13 06 0d | e7 20 6e 25 3c 3e 30 20 |(l%)....|. n%<>0 |
|00002b90| 8c 0d 13 10 17 20 20 f2 | 42 75 66 66 5f 43 6f 70 |..... .|Buff_Cop|
|00002ba0| 79 28 70 25 2c 6e 25 29 | 0d 13 1a 15 20 20 f2 42 |y(p%,n%)|.... .B|
|00002bb0| 75 66 66 5f 53 63 72 61 | 70 28 70 25 29 0d 13 24 |uff_Scra|p(p%)..$|
|00002bc0| 0b 20 20 70 25 3d 6e 25 | 0d 13 2e 05 cc 0d 13 38 |. p%=n%|.......8|
|00002bd0| 0a 20 20 70 25 3d 30 0d | 13 42 05 cd 0d 13 4c 05 |. p%=0.|.B....L.|
|00002be0| e1 0d 13 56 04 0d 13 60 | 16 dd f2 42 75 66 66 5f |...V...`|...Buff_|
|00002bf0| 43 6f 70 79 28 70 25 2c | 6e 25 29 0d 13 6a 08 ea |Copy(p%,|n%)..j..|
|00002c00| 20 69 25 0d 13 74 48 e7 | 21 70 25 3e 21 6e 25 20 | i%..tH.|!p%>!n% |
|00002c10| 8c 20 85 20 31 30 31 2c | 22 45 52 52 4f 52 20 2d |. . 101,|"ERROR -|
|00002c20| 20 42 75 66 66 65 72 20 | 74 6f 6f 20 73 6d 61 6c | Buffer |too smal|
|00002c30| 6c 2c 20 69 6e 20 42 75 | 66 66 5f 43 6f 70 79 20 |l, in Bu|ff_Copy |
|00002c40| 50 72 6f 63 65 64 75 72 | 65 3b 22 0d 13 7e 58 e7 |Procedur|e;"..~X.|
|00002c50| 21 70 25 83 34 3c 3e 30 | 20 8c 20 85 20 31 30 32 |!p%.4<>0| . . 102|
|00002c60| 2c 22 45 52 52 4f 52 20 | 2d 20 42 75 66 66 65 72 |,"ERROR |- Buffer|
|00002c70| 20 73 69 7a 65 20 6e 6f | 74 20 61 20 6d 75 6c 74 | size no|t a mult|
|00002c80| 69 70 6c 65 20 6f 66 20 | 34 2c 20 69 6e 20 42 75 |iple of |4, in Bu|
|00002c90| 66 66 5f 43 6f 70 79 20 | 50 72 6f 63 65 64 75 72 |ff_Copy |Procedur|
|00002ca0| 65 3b 22 0d 13 88 16 e3 | 20 69 25 3d 34 20 b8 20 |e;".....| i%=4 . |
|00002cb0| 21 70 25 2d 31 20 88 20 | 34 0d 13 92 11 20 20 6e |!p%-1 . |4.... n|
|00002cc0| 25 21 69 25 3d 70 25 21 | 69 25 0d 13 9c 08 ed 20 |%!i%=p%!|i%..... |
|00002cd0| 69 25 0d 13 a6 05 e1 0d | 13 b0 04 0d 13 ba 1c dd |i%......|........|
|00002ce0| a4 42 75 66 66 5f 66 69 | 6c 65 6c 6f 61 64 28 6e |.Buff_fi|leload(n|
|00002cf0| 24 2c f8 20 62 25 29 0d | 13 c4 14 ea 20 74 25 2c |$,. b%).|.... t%,|
|00002d00| 6c 25 2c 65 25 2c 6e 25 | 2c 72 25 0d 13 ce 21 c8 |l%,e%,n%|,r%...!.|
|00002d10| 99 22 4f 53 5f 46 69 6c | 65 22 2c 35 2c 6e 24 20 |."OS_Fil|e",5,n$ |
|00002d20| b8 20 72 25 2c 2c 74 25 | 2c 2c 6c 25 0d 13 d8 0e |. r%,,t%|,,l%....|
|00002d30| 65 25 3d 6c 25 2b 26 34 | 30 30 0d 13 e2 23 e7 20 |e%=l%+&4|00...#. |
|00002d40| 65 25 3e 21 62 25 20 8c | 20 f2 42 75 66 66 5f 45 |e%>!b% .| .Buff_E|
|00002d50| 6e 6c 61 72 67 65 28 62 | 25 2c 65 25 29 0d 13 ec |nlarge(b|%,e%)...|
|00002d60| 0f e7 20 62 25 3d 30 20 | 8c 20 3d 30 0d 13 f6 33 |.. b%=0 |. =0...3|
|00002d70| 62 25 21 34 3d 6c 25 3a | c8 99 20 22 4f 53 5f 46 |b%!4=l%:|.. "OS_F|
|00002d80| 69 6c 65 22 2c 32 35 35 | 2c 6e 24 2c 62 25 2b 38 |ile",255|,n$,b%+8|
|00002d90| 2c 30 3a 21 28 62 25 2b | 6c 25 2b 38 29 3d 30 0d |,0:!(b%+|l%+8)=0.|
|00002da0| 14 00 09 3d 62 25 2b 34 | 0d 14 0a 20 dd f2 6b 65 |...=b%+4|... ..ke|
|00002db0| 79 70 72 65 73 73 5f 6d | 61 69 6e 77 28 69 63 6f |ypress_m|ainw(ico|
|00002dc0| 6e 25 2c 6b 65 79 25 29 | 0d 14 14 04 0d 14 1e 05 |n%,key%)|........|
|00002dd0| e1 0d 14 28 0a dd f2 64 | 72 61 77 0d 14 32 0a f2 |...(...d|raw..2..|
|00002de0| 53 57 61 76 65 0d 14 3c | 05 e1 0d 14 46 04 0d 14 |SWave..<|....F...|
|00002df0| 50 31 dd a4 6f 73 5f 56 | 61 72 47 65 74 56 61 6c |P1..os_V|arGetVal|
|00002e00| 28 62 75 66 66 65 72 25 | 2c 73 69 7a 65 25 2c 76 |(buffer%|,size%,v|
|00002e10| 61 72 6e 61 6d 65 24 2c | 65 78 70 61 6e 64 29 0d |arname$,|expand).|
|00002e20| 14 5a 25 ea 20 76 61 6c | 75 65 24 2c 6e 72 5f 62 |.Z%. val|ue$,nr_b|
|00002e30| 79 74 65 73 25 2c 6e 61 | 6d 65 70 74 72 25 2c 6c |ytes%,na|meptr%,l|
|00002e40| 6f 6f 70 25 0d 14 64 5b | c8 99 20 22 58 4f 53 5f |oop%..d[|.. "XOS_|
|00002e50| 52 65 61 64 56 61 72 56 | 61 6c 22 2c 76 61 72 6e |ReadVarV|al",varn|
|00002e60| 61 6d 65 24 2c 62 75 66 | 66 65 72 25 2c 73 69 7a |ame$,buf|fer%,siz|
|00002e70| 65 25 2c 30 2c 2d 33 2a | 28 65 78 70 61 6e 64 3d |e%,0,-3*|(expand=|
|00002e80| b9 29 20 b8 20 2c 2c 6e | 72 5f 62 79 74 65 73 25 |.) . ,,n|r_bytes%|
|00002e90| 2c 6e 61 6d 65 70 74 72 | 25 2c 74 79 70 65 25 0d |,nameptr|%,type%.|
|00002ea0| 14 6e 1b e3 20 6c 6f 6f | 70 25 3d 30 20 b8 20 6e |.n.. loo|p%=0 . n|
|00002eb0| 72 5f 62 79 74 65 73 25 | 2d 31 0d 14 78 33 20 20 |r_bytes%|-1..x3 |
|00002ec0| 76 61 6c 75 65 24 3d 76 | 61 6c 75 65 24 2b bd 28 |value$=v|alue$+.(|
|00002ed0| 6e 61 6d 65 70 74 72 25 | 3f 28 6c 6f 6f 70 25 2b |nameptr%|?(loop%+|
|00002ee0| a9 76 61 72 6e 61 6d 65 | 24 2b 33 29 29 0d 14 82 |.varname|$+3))...|
|00002ef0| 0b ed 20 6c 6f 6f 70 25 | 0d 14 8c 0b 3d 76 61 6c |.. loop%|....=val|
|00002f00| 75 65 24 0d 14 96 04 0d | 14 a0 0f dd f2 53 57 61 |ue$.....|.....SWa|
|00002f10| 76 65 6d 61 6b 65 0d 14 | aa 0f e3 20 43 25 3d 30 |vemake..|... C%=0|
|00002f20| 20 b8 20 34 31 0d 14 b4 | 1c 20 41 28 43 25 29 3d | . 41...|. A(C%)=|
|00002f30| b5 28 43 25 2f 28 47 2a | af 2a 32 29 29 2a 31 32 |.(C%/(G*|.*2))*12|
|00002f40| 30 0d 14 be 05 ed 0d 14 | c8 0f 20 e3 43 25 3d 30 |0.......|.. .C%=0|
|00002f50| 20 b8 20 34 31 0d 14 d2 | 14 20 42 28 43 25 29 3d | . 41...|. B(C%)=|
|00002f60| b5 28 43 25 2f 28 af 29 | 29 0d 14 dc 06 20 ed 0d |.(C%/(.)|).... ..|
|00002f70| 14 e6 37 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |..7.. "O|S_Sprite|
|00002f80| 4f 70 22 2c 35 31 32 2b | 36 30 2c 73 70 2c 73 70 |Op",512+|60,sp,sp|
|00002f90| 5f 70 74 72 31 25 2c 30 | 20 b8 20 72 30 2c 72 31 |_ptr1%,0| . r0,r1|
|00002fa0| 2c 72 32 2c 72 33 0d 14 | f0 05 da 0d 14 fa 20 c8 |,r2,r3..|...... .|
|00002fb0| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00002fc0| 72 30 2c 72 31 2c 72 32 | 2c 72 33 0d 15 04 05 e1 |r0,r1,r2|,r3.....|
|00002fd0| 0d 15 0e 0b dd f2 53 57 | 61 76 65 0d 15 18 38 c8 |......SW|ave...8.|
|00002fe0| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00002ff0| 35 31 32 2b 36 30 2c 73 | 70 31 2c 73 70 5f 70 74 |512+60,s|p1,sp_pt|
|00003000| 72 31 25 2c 30 20 b8 20 | 72 30 2c 72 31 2c 72 32 |r1%,0 . |r0,r1,r2|
|00003010| 2c 72 33 0d 15 22 0b 44 | 25 3d 44 25 2b 31 0d 15 |,r3..".D|%=D%+1..|
|00003020| 2c 0f e3 20 43 25 3d 30 | 20 b8 20 34 30 0d 15 36 |,.. C%=0| . 40..6|
|00003030| 47 20 e7 44 25 3c 3e 31 | 20 c8 99 20 22 4f 53 5f |G .D%<>1| .. "OS_|
|00003040| 53 70 72 69 74 65 4f 70 | 22 2c 26 32 32 32 2c 73 |SpriteOp|",&222,s|
|00003050| 70 2c 73 70 5f 70 74 72 | 32 25 2c 32 39 2a 43 25 |p,sp_ptr|2%,29*C%|
|00003060| 2c 32 38 30 2b 41 28 43 | 25 29 2a 42 28 44 25 2d |,280+A(C|%)*B(D%-|
|00003070| 31 29 2c 30 0d 15 40 12 | ed 3a e7 20 44 25 3d 34 |1),0..@.|.:. D%=4|
|00003080| 31 3a 44 25 3d 30 0d 15 | 4a 20 c8 99 20 22 4f 53 |1:D%=0..|J .. "OS|
|00003090| 5f 53 70 72 69 74 65 4f | 70 22 2c 72 30 2c 72 31 |_SpriteO|p",r0,r1|
|000030a0| 2c 72 32 2c 72 33 0d 15 | 54 05 e1 0d 15 5e 1e dd |,r2,r3..|T....^..|
|000030b0| f2 63 6c 69 63 6b 68 61 | 72 6d 28 62 75 74 74 6f |.clickha|rm(butto|
|000030c0| 6e 25 2c 69 63 6f 6e 25 | 29 0d 15 68 0a c8 8e 20 |n%,icon%|)..h... |
|000030d0| b9 20 ca 0d 15 72 15 c9 | 20 28 62 75 74 74 6f 6e |. ...r..| (button|
|000030e0| 25 20 80 20 34 29 3d 34 | 0d 15 7c 06 ef 37 0d 15 |% . 4)=4|..|..7..|
|000030f0| 86 25 46 25 3d bb 28 a4 | 69 63 6f 6e 5f 67 65 74 |.%F%=.(.|icon_get|
|00003100| 64 61 74 61 28 71 25 21 | 30 2c 68 61 72 6d 25 2c |data(q%!|0,harm%,|
|00003110| 30 29 29 0d 15 90 15 47 | 3d 32 2f 46 25 3a f2 53 |0))....G|=2/F%:.S|
|00003120| 77 61 76 65 6d 61 6b 65 | 0d 15 9a 05 cb 0d 15 a4 |wavemake|........|
|00003130| 05 e1 0d 15 ae 1d dd f2 | 6b 65 79 70 72 65 73 73 |........|keypress|
|00003140| 5f 68 61 72 6d 28 61 25 | 2c 62 25 2c 63 25 29 0d |_harm(a%|,b%,c%).|
|00003150| 15 b8 06 ef 37 0d 15 c2 | 06 20 e1 0d ff |....7...|. ... |
+--------+-------------------------+-------------------------+--------+--------+
